/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / fast-lock.elc.z / fast-lock.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 73 69 6d 6f 6e 40 64 |piled by| simon@d|
|00000020| 75 61 6c 69 74 79 2e 67 | 6e 75 2e 61 69 2e 6d 69 |uality.g|nu.ai.mi|
|00000030| 74 2e 65 64 75 20 6f 6e | 20 4d 6f 6e 20 4a 75 6e |t.edu on| Mon Jun|
|00000040| 20 32 34 20 30 33 3a 34 | 39 3a 32 34 20 31 39 39 | 24 03:4|9:24 199|
|00000050| 36 0a 3b 3b 3b 20 66 72 | 6f 6d 20 66 69 6c 65 20 |6.;;; fr|om file |
|00000060| 2f 68 6f 6d 65 2f 67 70 | 32 2f 73 69 6d 6f 6e 2f |/home/gp|2/simon/|
|00000070| 45 6d 61 63 73 2f 6c 69 | 73 70 2f 66 61 73 74 2d |Emacs/li|sp/fast-|
|00000080| 6c 6f 63 6b 2e 65 6c 0a | 3b 3b 3b 20 65 6d 61 63 |lock.el.|;;; emac|
|00000090| 73 20 76 65 72 73 69 6f | 6e 20 31 39 2e 33 31 2e |s versio|n 19.31.|
|000000a0| 31 2e 0a 3b 3b 3b 20 62 | 79 74 65 63 6f 6d 70 20 |1..;;; b|ytecomp |
|000000b0| 76 65 72 73 69 6f 6e 20 | 46 53 46 20 32 2e 31 30 |version |FSF 2.10|
|000000c0| 0a 3b 3b 3b 20 6f 70 74 | 69 6d 69 7a 61 74 69 6f |.;;; opt|imizatio|
|000000d0| 6e 20 69 73 20 6f 6e 2e | 0a 3b 3b 3b 20 74 68 69 |n is on.|.;;; thi|
|000000e0| 73 20 66 69 6c 65 20 75 | 73 65 73 20 6f 70 63 6f |s file u|ses opco|
|000000f0| 64 65 73 20 77 68 69 63 | 68 20 64 6f 20 6e 6f 74 |des whic|h do not|
|00000100| 20 65 78 69 73 74 20 69 | 6e 20 45 6d 61 63 73 20 | exist i|n Emacs |
|00000110| 31 38 2e 0a 0a 28 69 66 | 20 28 61 6e 64 20 28 62 |18...(if| (and (b|
|00000120| 6f 75 6e 64 70 20 27 65 | 6d 61 63 73 2d 76 65 72 |oundp 'e|macs-ver|
|00000130| 73 69 6f 6e 29 0a 09 20 | 28 6f 72 20 28 61 6e 64 |sion).. |(or (and|
|00000140| 20 28 62 6f 75 6e 64 70 | 20 27 65 70 6f 63 68 3a | (boundp| 'epoch:|
|00000150| 3a 76 65 72 73 69 6f 6e | 29 20 65 70 6f 63 68 3a |:version|) epoch:|
|00000160| 3a 76 65 72 73 69 6f 6e | 29 0a 09 20 20 20 20 20 |:version|)..     |
|00000170| 28 73 74 72 69 6e 67 2d | 6c 65 73 73 70 20 65 6d |(string-|lessp em|
|00000180| 61 63 73 2d 76 65 72 73 | 69 6f 6e 20 22 31 39 2e |acs-vers|ion "19.|
|00000190| 32 39 22 29 29 29 0a 20 | 20 20 20 28 65 72 72 6f |29"))). |   (erro|
|000001a0| 72 20 22 60 66 61 73 74 | 2d 6c 6f 63 6b 2e 65 6c |r "`fast|-lock.el|
|000001b0| 27 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |' was co|mpiled f|
|000001c0| 6f 72 20 45 6d 61 63 73 | 20 31 39 2e 32 39 20 6f |or Emacs| 19.29 o|
|000001d0| 72 20 6c 61 74 65 72 22 | 29 29 0a 0a 0a 28 62 79 |r later"|))...(by|
|000001e0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 21 88 5c 6e c3 |te-code |"..!.\n.|
|000001f0| 3d 83 13 00 c4 20 84 13 | 00 c5 c6 21 88 c0 87 22 |=.... ..|...!..."|
|00000200| 20 5b 72 65 71 75 69 72 | 65 20 66 6f 6e 74 2d 6c | [requir|e font-l|
|00000210| 6f 63 6b 20 73 79 73 74 | 65 6d 2d 74 79 70 65 20 |ock syst|em-type |
|00000220| 6d 73 2d 64 6f 73 20 6d | 73 64 6f 73 2d 6c 6f 6e |ms-dos m|sdos-lon|
|00000230| 67 2d 66 69 6c 65 2d 6e | 61 6d 65 73 20 65 72 72 |g-file-n|ames err|
|00000240| 6f 72 20 22 60 66 61 73 | 74 2d 6c 6f 63 6b 27 20 |or "`fas|t-lock' |
|00000250| 77 61 73 20 77 72 69 74 | 74 65 6e 20 66 6f 72 20 |was writ|ten for |
|00000260| 6c 6f 6e 67 20 66 69 6c | 65 20 6e 61 6d 65 20 73 |long fil|e name s|
|00000270| 79 73 74 65 6d 73 22 5d | 20 32 29 0a 23 40 34 37 |ystems"]| 2).#@47|
|00000280| 20 53 75 62 6d 69 74 20 | 76 69 61 20 6d 61 69 6c | Submit |via mail|
|00000290| 20 61 20 62 75 67 20 72 | 65 70 6f 72 74 20 6f 6e | a bug r|eport on|
|000002a0| 20 66 61 73 74 2d 6c 6f | 63 6b 2e 65 6c 2e 1f 0a | fast-lo|ck.el...|
|000002b0| 28 64 65 66 61 6c 69 61 | 73 20 27 66 61 73 74 2d |(defalia|s 'fast-|
|000002c0| 6c 6f 63 6b 2d 73 75 62 | 6d 69 74 2d 62 75 67 2d |lock-sub|mit-bug-|
|000002d0| 72 65 70 6f 72 74 20 23 | 5b 6e 69 6c 20 23 40 35 |report #|[nil #@5|
|000002e0| 32 39 20 28 22 c0 19 c2 | c3 c4 c5 c6 89 c7 0e 08 |29 ("...|........|
|000002f0| c9 51 26 06 29 87 22 20 | 2e 20 5b 74 20 72 65 70 |.Q&.)." |. [t rep|
|00000300| 6f 72 74 65 72 2d 70 72 | 6f 6d 70 74 2d 66 6f 72 |orter-pr|ompt-for|
|00000310| 2d 73 75 6d 6d 61 72 79 | 2d 70 20 72 65 70 6f 72 |-summary|-p repor|
|00000320| 74 65 72 2d 73 75 62 6d | 69 74 2d 62 75 67 2d 72 |ter-subm|it-bug-r|
|00000330| 65 70 6f 72 74 20 22 73 | 69 6d 6f 6e 40 67 6e 75 |eport "s|imon@gnu|
|00000340| 2e 61 69 2e 6d 69 74 2e | 65 64 75 22 20 22 66 61 |.ai.mit.|edu" "fa|
|00000350| 73 74 2d 6c 6f 63 6b 20 | 33 2e 31 30 22 20 28 66 |st-lock |3.10" (f|
|00000360| 61 73 74 2d 6c 6f 63 6b | 2d 63 61 63 68 65 2d 64 |ast-lock|-cache-d|
|00000370| 69 72 65 63 74 6f 72 69 | 65 73 20 66 61 73 74 2d |irectori|es fast-|
|00000380| 6c 6f 63 6b 2d 6d 69 6e | 69 6d 75 6d 2d 73 69 7a |lock-min|imum-siz|
|00000390| 65 20 66 61 73 74 2d 6c | 6f 63 6b 2d 73 61 76 65 |e fast-l|ock-save|
|000003a0| 2d 6f 74 68 65 72 73 20 | 66 61 73 74 2d 6c 6f 63 |-others |fast-loc|
|000003b0| 6b 2d 73 61 76 65 2d 65 | 76 65 6e 74 73 20 66 61 |k-save-e|vents fa|
|000003c0| 73 74 2d 6c 6f 63 6b 2d | 73 61 76 65 2d 66 61 63 |st-lock-|save-fac|
|000003d0| 65 73 29 20 6e 69 6c 20 | 22 48 69 20 53 69 2e 2c |es) nil |"Hi Si.,|
|000003e0| 5c 6e 5c 6e 49 20 77 61 | 6e 74 20 74 6f 20 72 65 |\n\nI wa|nt to re|
|000003f0| 70 6f 72 74 20 61 20 62 | 75 67 2e 20 20 49 27 76 |port a b|ug.  I'v|
|00000400| 65 20 72 65 61 64 20 74 | 68 65 20 60 42 75 67 73 |e read t|he `Bugs|
|00000410| 27 20 73 65 63 74 69 6f | 6e 20 6f 66 20 60 49 6e |' sectio|n of `In|
|00000420| 66 6f 27 20 6f 6e 20 45 | 6d 61 63 73 2c 20 73 6f |fo' on E|macs, so|
|00000430| 20 49 5c 6e 6b 6e 6f 77 | 20 68 6f 77 20 74 6f 20 | I\nknow| how to |
|00000440| 6d 61 6b 65 20 61 20 63 | 6c 65 61 72 20 61 6e 64 |make a c|lear and|
|00000450| 20 75 6e 61 6d 62 69 67 | 75 6f 75 73 20 72 65 70 | unambig|uous rep|
|00000460| 6f 72 74 2e 20 20 54 6f | 20 72 65 70 72 6f 64 75 |ort.  To| reprodu|
|00000470| 63 65 20 74 68 65 20 62 | 75 67 3a 5c 6e 5c 6e 53 |ce the b|ug:\n\nS|
|00000480| 74 61 72 74 20 61 20 66 | 72 65 73 68 20 45 6d 61 |tart a f|resh Ema|
|00000490| 63 73 20 76 69 61 20 60 | 22 20 69 6e 76 6f 63 61 |cs via `|" invoca|
|000004a0| 74 69 6f 6e 2d 6e 61 6d | 65 20 22 20 2d 6e 6f 2d |tion-nam|e " -no-|
|000004b0| 69 6e 69 74 2d 66 69 6c | 65 20 2d 6e 6f 2d 73 69 |init-fil|e -no-si|
|000004c0| 74 65 2d 66 69 6c 65 27 | 2e 5c 6e 49 6e 20 74 68 |te-file'|.\nIn th|
|000004d0| 65 20 60 2a 73 63 72 61 | 74 63 68 2a 27 20 62 75 |e `*scra|tch*' bu|
|000004e0| 66 66 65 72 2c 20 65 76 | 61 6c 75 61 74 65 3a 22 |ffer, ev|aluate:"|
|000004f0| 5d 29 1f 28 23 24 20 2e | 20 37 33 39 29 20 6e 69 |]).(#$ .| 739) ni|
|00000500| 6c 20 39 20 28 23 24 20 | 2e 20 36 34 31 29 20 6e |l 9 (#$ |. 641) n|
|00000510| 69 6c 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |il]).(by|te-code |
|00000520| 22 c0 c1 21 84 08 00 c2 | 11 c1 0b 42 13 c0 c4 21 |"..!....|...B...!|
|00000530| 84 14 00 c2 14 c4 0b 42 | 13 c0 c5 21 84 20 00 c2 |.......B|...!. ..|
|00000540| 15 c5 0b 42 13 c2 87 22 | 20 5b 62 6f 75 6e 64 70 |...B..."| [boundp|
|00000550| 20 66 61 73 74 2d 6c 6f | 63 6b 2d 6d 6f 64 65 20 | fast-lo|ck-mode |
|00000560| 6e 69 6c 20 63 75 72 72 | 65 6e 74 2d 6c 6f 61 64 |nil curr|ent-load|
|00000570| 2d 6c 69 73 74 20 66 61 | 73 74 2d 6c 6f 63 6b 2d |-list fa|st-lock-|
|00000580| 63 61 63 68 65 2d 74 69 | 6d 65 73 74 61 6d 70 20 |cache-ti|mestamp |
|00000590| 66 61 73 74 2d 6c 6f 63 | 6b 2d 63 61 63 68 65 2d |fast-loc|k-cache-|
|000005a0| 66 69 6c 65 6e 61 6d 65 | 5d 20 32 29 0a 23 40 38 |filename|] 2).#@8|
|000005b0| 33 32 20 2a 44 69 72 65 | 63 74 6f 72 69 65 73 20 |32 *Dire|ctories |
|000005c0| 69 6e 20 77 68 69 63 68 | 20 46 6f 6e 74 20 4c 6f |in which| Font Lo|
|000005d0| 63 6b 20 63 61 63 68 65 | 20 66 69 6c 65 73 20 61 |ck cache| files a|
|000005e0| 72 65 20 73 61 76 65 64 | 20 61 6e 64 20 72 65 61 |re saved| and rea|
|000005f0| 64 2e 0a 45 61 63 68 20 | 69 74 65 6d 20 73 68 6f |d..Each |item sho|
|00000600| 75 6c 64 20 62 65 20 65 | 69 74 68 65 72 20 44 49 |uld be e|ither DI|
|00000610| 52 20 6f 72 20 61 20 63 | 6f 6e 73 20 70 61 69 72 |R or a c|ons pair|
|00000620| 20 6f 66 20 74 68 65 20 | 66 6f 72 6d 20 28 52 45 | of the |form (RE|
|00000630| 47 45 58 50 20 2e 20 44 | 49 52 29 20 77 68 65 72 |GEXP . D|IR) wher|
|00000640| 65 0a 44 49 52 20 69 73 | 20 61 20 64 69 72 65 63 |e.DIR is| a direc|
|00000650| 74 6f 72 79 20 6e 61 6d | 65 20 28 72 65 6c 61 74 |tory nam|e (relat|
|00000660| 69 76 65 20 6f 72 20 61 | 62 73 6f 6c 75 74 65 29 |ive or a|bsolute)|
|00000670| 20 61 6e 64 20 52 45 47 | 45 58 50 20 69 73 20 61 | and REG|EXP is a|
|00000680| 20 72 65 67 65 78 70 2e | 0a 0a 41 6e 20 61 74 74 | regexp.|..An att|
|00000690| 65 6d 70 74 20 77 69 6c | 6c 20 62 65 20 6d 61 64 |empt wil|l be mad|
|000006a0| 65 20 74 6f 20 73 61 76 | 65 20 6f 72 20 72 65 61 |e to sav|e or rea|
|000006b0| 64 20 46 6f 6e 74 20 4c | 6f 63 6b 20 63 61 63 68 |d Font L|ock cach|
|000006c0| 65 20 66 69 6c 65 73 20 | 75 73 69 6e 67 20 74 68 |e files |using th|
|000006d0| 65 73 65 20 69 74 65 6d | 73 0a 75 6e 74 69 6c 20 |ese item|s.until |
|000006e0| 6f 6e 65 20 73 75 63 63 | 65 65 64 73 20 28 69 2e |one succ|eeds (i.|
|000006f0| 65 2e 2c 20 75 6e 74 69 | 6c 20 61 20 72 65 61 64 |e., unti|l a read|
|00000700| 61 62 6c 65 20 6f 72 20 | 77 72 69 74 61 62 6c 65 |able or |writable|
|00000710| 20 6f 6e 65 20 69 73 20 | 66 6f 75 6e 64 29 2e 20 | one is |found). |
|00000720| 20 49 66 20 61 6e 0a 69 | 74 65 6d 20 63 6f 6e 74 | If an.i|tem cont|
|00000730| 61 69 6e 73 20 52 45 47 | 45 58 50 2c 20 44 49 52 |ains REG|EXP, DIR|
|00000740| 20 69 73 20 75 73 65 64 | 20 6f 6e 6c 79 20 69 66 | is used| only if|
|00000750| 20 74 68 65 20 62 75 66 | 66 65 72 20 66 69 6c 65 | the buf|fer file|
|00000760| 20 6e 61 6d 65 20 6d 61 | 74 63 68 65 73 20 52 45 | name ma|tches RE|
|00000770| 47 45 58 50 2e 0a 46 6f | 72 20 65 78 61 6d 70 6c |GEXP..Fo|r exampl|
|00000780| 65 3a 0a 0a 20 28 6c 65 | 74 20 28 28 68 6f 6d 65 |e:.. (le|t ((home|
|00000790| 20 28 65 78 70 61 6e 64 | 2d 66 69 6c 65 2d 6e 61 | (expand|-file-na|
|000007a0| 6d 65 20 28 61 62 62 72 | 65 76 69 61 74 65 2d 66 |me (abbr|eviate-f|
|000007b0| 69 6c 65 2d 6e 61 6d 65 | 20 28 66 69 6c 65 2d 74 |ile-name| (file-t|
|000007c0| 72 75 65 6e 61 6d 65 20 | 22 7e 2f 22 29 29 29 29 |ruename |"~/"))))|
|000007d0| 29 0a 20 20 20 28 6c 69 | 73 74 20 28 63 6f 6e 73 |).   (li|st (cons|
|000007e0| 20 28 63 6f 6e 63 61 74 | 20 22 5e 22 20 28 72 65 | (concat| "^" (re|
|000007f0| 67 65 78 70 2d 71 75 6f | 74 65 20 68 6f 6d 65 29 |gexp-quo|te home)|
|00000800| 29 20 22 2e 22 29 20 22 | 7e 2f 2e 65 6d 61 63 73 |) ".") "|~/.emacs|
|00000810| 2d 66 6c 63 22 29 29 0a | 20 20 20 20 3d 3e 0a 20 |-flc")).|    =>. |
|00000820| 28 28 22 5e 2f 79 6f 75 | 72 2f 74 72 75 65 2f 68 |(("^/you|r/true/h|
|00000830| 6f 6d 65 2f 64 69 72 65 | 63 74 6f 72 79 2f 22 20 |ome/dire|ctory/" |
|00000840| 2e 20 22 2e 22 29 20 22 | 7e 2f 2e 65 6d 61 63 73 |. ".") "|~/.emacs|
|00000850| 2d 66 6c 63 22 29 0a 0a | 77 6f 75 6c 64 20 63 61 |-flc")..|would ca|
|00000860| 75 73 65 20 61 20 66 69 | 6c 65 27 73 20 63 75 72 |use a fi|le's cur|
|00000870| 72 65 6e 74 20 64 69 72 | 65 63 74 6f 72 79 20 74 |rent dir|ectory t|
|00000880| 6f 20 62 65 20 75 73 65 | 64 20 69 66 20 74 68 65 |o be use|d if the|
|00000890| 20 66 69 6c 65 20 69 73 | 20 75 6e 64 65 72 20 79 | file is| under y|
|000008a0| 6f 75 72 0a 68 6f 6d 65 | 20 64 69 72 65 63 74 6f |our.home| directo|
|000008b0| 72 79 20 68 69 65 72 61 | 72 63 68 79 2c 20 6f 72 |ry hiera|rchy, or|
|000008c0| 20 6f 74 68 65 72 77 69 | 73 65 20 74 68 65 20 61 | otherwi|se the a|
|000008d0| 62 73 6f 6c 75 74 65 20 | 64 69 72 65 63 74 6f 72 |bsolute |director|
|000008e0| 79 20 60 7e 2f 2e 65 6d | 61 63 73 2d 66 6c 63 27 |y `~/.em|acs-flc'|
|000008f0| 2e 1f 0a 28 64 65 66 76 | 61 72 20 66 61 73 74 2d |...(defv|ar fast-|
|00000900| 6c 6f 63 6b 2d 63 61 63 | 68 65 2d 64 69 72 65 63 |lock-cac|he-direc|
|00000910| 74 6f 72 69 65 73 20 28 | 71 75 6f 74 65 20 28 22 |tories (|quote ("|
|00000920| 2e 22 20 22 7e 2f 2e 65 | 6d 61 63 73 2d 66 6c 63 |." "~/.e|macs-flc|
|00000930| 22 29 29 20 28 23 24 20 | 2e 20 2d 31 34 35 39 29 |")) (#$ |. -1459)|
|00000940| 29 0a 23 40 35 32 37 20 | 2a 4d 69 6e 69 6d 75 6d |).#@527 |*Minimum|
|00000950| 20 73 69 7a 65 20 6f 66 | 20 61 20 62 75 66 66 65 | size of| a buffe|
|00000960| 72 20 66 6f 72 20 63 61 | 63 68 65 64 20 66 6f 6e |r for ca|ched fon|
|00000970| 74 69 66 69 63 61 74 69 | 6f 6e 2e 0a 4f 6e 6c 79 |tificati|on..Only|
|00000980| 20 62 75 66 66 65 72 73 | 20 6d 6f 72 65 20 74 68 | buffers| more th|
|00000990| 61 6e 20 74 68 69 73 20 | 63 61 6e 20 68 61 76 65 |an this |can have|
|000009a0| 20 61 73 73 6f 63 69 61 | 74 65 64 20 46 6f 6e 74 | associa|ted Font|
|000009b0| 20 4c 6f 63 6b 20 63 61 | 63 68 65 20 66 69 6c 65 | Lock ca|che file|
|000009c0| 73 20 73 61 76 65 64 2e | 0a 49 66 20 6e 69 6c 2c |s saved.|.If nil,|
|000009d0| 20 6d 65 61 6e 73 20 63 | 61 63 68 65 20 66 69 6c | means c|ache fil|
|000009e0| 65 73 20 61 72 65 20 6e | 65 76 65 72 20 63 72 65 |es are n|ever cre|
|000009f0| 61 74 65 64 2e 0a 49 66 | 20 61 20 6c 69 73 74 2c |ated..If| a list,|
|00000a00| 20 65 61 63 68 20 65 6c | 65 6d 65 6e 74 20 73 68 | each el|ement sh|
|00000a10| 6f 75 6c 64 20 62 65 20 | 61 20 63 6f 6e 73 20 70 |ould be |a cons p|
|00000a20| 61 69 72 20 6f 66 20 74 | 68 65 20 66 6f 72 6d 20 |air of t|he form |
|00000a30| 28 4d 41 4a 4f 52 2d 4d | 4f 44 45 20 2e 20 53 49 |(MAJOR-M|ODE . SI|
|00000a40| 5a 45 29 2c 0a 77 68 65 | 72 65 20 4d 41 4a 4f 52 |ZE),.whe|re MAJOR|
|00000a50| 2d 4d 4f 44 45 20 69 73 | 20 61 20 73 79 6d 62 6f |-MODE is| a symbo|
|00000a60| 6c 20 6f 72 20 74 20 28 | 6d 65 61 6e 69 6e 67 20 |l or t (|meaning |
|00000a70| 74 68 65 20 64 65 66 61 | 75 6c 74 29 2e 20 20 46 |the defa|ult).  F|
|00000a80| 6f 72 20 65 78 61 6d 70 | 6c 65 3a 0a 20 28 28 63 |or examp|le:. ((c|
|00000a90| 2d 6d 6f 64 65 20 2e 20 | 32 35 36 30 30 29 20 28 |-mode . |25600) (|
|00000aa0| 63 2b 2b 2d 6d 6f 64 65 | 20 2e 20 32 35 36 30 30 |c++-mode| . 25600|
|00000ab0| 29 20 28 72 6d 61 69 6c | 2d 6d 6f 64 65 20 2e 20 |) (rmail|-mode . |
|00000ac0| 31 30 34 38 35 37 36 29 | 29 0a 6d 65 61 6e 73 20 |1048576)|).means |
|00000ad0| 74 68 61 74 20 74 68 65 | 20 6d 69 6e 69 6d 75 6d |that the| minimum|
|00000ae0| 20 73 69 7a 65 20 69 73 | 20 32 35 4b 20 66 6f 72 | size is| 25K for|
|00000af0| 20 62 75 66 66 65 72 73 | 20 69 6e 20 43 20 6f 72 | buffers| in C or|
|00000b00| 20 43 2b 2b 20 6d 6f 64 | 65 73 2c 20 6f 6e 65 20 | C++ mod|es, one |
|00000b10| 6d 65 67 61 62 79 74 65 | 0a 66 6f 72 20 62 75 66 |megabyte|.for buf|
|00000b20| 66 65 72 73 20 69 6e 20 | 52 6d 61 69 6c 20 6d 6f |fers in |Rmail mo|
|00000b30| 64 65 2c 20 61 6e 64 20 | 73 69 7a 65 20 69 73 20 |de, and |size is |
|00000b40| 69 72 72 65 6c 65 76 61 | 6e 74 20 6f 74 68 65 72 |irreleva|nt other|
|00000b50| 77 69 73 65 2e 1f 0a 28 | 64 65 66 76 61 72 20 66 |wise...(|defvar f|
|00000b60| 61 73 74 2d 6c 6f 63 6b | 2d 6d 69 6e 69 6d 75 6d |ast-lock|-minimum|
|00000b70| 2d 73 69 7a 65 20 32 35 | 36 30 30 20 28 23 24 20 |-size 25|600 (#$ |
|00000b80| 2e 20 2d 32 33 37 36 29 | 29 0a 23 40 32 34 32 20 |. -2376)|).#@242 |
|00000b90| 2a 45 76 65 6e 74 73 20 | 75 6e 64 65 72 20 77 68 |*Events |under wh|
|00000ba0| 69 63 68 20 63 61 63 68 | 65 73 20 77 69 6c 6c 20 |ich cach|es will |
|00000bb0| 62 65 20 73 61 76 65 64 | 2e 0a 56 61 6c 69 64 20 |be saved|..Valid |
|00000bc0| 65 76 65 6e 74 73 20 61 | 72 65 20 60 73 61 76 65 |events a|re `save|
|00000bd0| 2d 62 75 66 66 65 72 27 | 2c 20 60 6b 69 6c 6c 2d |-buffer'|, `kill-|
|00000be0| 62 75 66 66 65 72 27 20 | 61 6e 64 20 60 6b 69 6c |buffer' |and `kil|
|00000bf0| 6c 2d 65 6d 61 63 73 27 | 2e 0a 49 66 20 63 6f 6e |l-emacs'|..If con|
|00000c00| 63 75 72 72 65 6e 74 20 | 65 64 69 74 69 6e 67 20 |current |editing |
|00000c10| 73 65 73 73 69 6f 6e 73 | 20 75 73 65 20 74 68 65 |sessions| use the|
|00000c20| 20 73 61 6d 65 20 61 73 | 73 6f 63 69 61 74 65 64 | same as|sociated|
|00000c30| 20 63 61 63 68 65 20 66 | 69 6c 65 20 66 6f 72 20 | cache f|ile for |
|00000c40| 61 20 66 69 6c 65 27 73 | 0a 62 75 66 66 65 72 2c |a file's|.buffer,|
|00000c50| 20 74 68 65 6e 20 79 6f | 75 20 73 68 6f 75 6c 64 | then yo|u should|
|00000c60| 20 61 64 64 20 60 73 61 | 76 65 2d 62 75 66 66 65 | add `sa|ve-buffe|
|00000c70| 72 27 20 74 6f 20 74 68 | 69 73 20 6c 69 73 74 2e |r' to th|is list.|
|00000c80| 1f 0a 28 64 65 66 76 61 | 72 20 66 61 73 74 2d 6c |..(defva|r fast-l|
|00000c90| 6f 63 6b 2d 73 61 76 65 | 2d 65 76 65 6e 74 73 20 |ock-save|-events |
|00000ca0| 28 71 75 6f 74 65 20 28 | 6b 69 6c 6c 2d 62 75 66 |(quote (|kill-buf|
|00000cb0| 66 65 72 20 6b 69 6c 6c | 2d 65 6d 61 63 73 29 29 |fer kill|-emacs))|
|00000cc0| 20 28 23 24 20 2e 20 2d | 32 39 36 30 29 29 0a 23 | (#$ . -|2960)).#|
|00000cd0| 40 32 32 32 20 2a 49 66 | 20 6e 6f 6e 2d 6e 69 6c |@222 *If| non-nil|
|00000ce0| 2c 20 73 61 76 65 20 46 | 6f 6e 74 20 4c 6f 63 6b |, save F|ont Lock|
|00000cf0| 20 63 61 63 68 65 20 66 | 69 6c 65 73 20 69 72 72 | cache f|iles irr|
|00000d00| 65 73 70 65 63 74 69 76 | 65 20 6f 66 20 66 69 6c |espectiv|e of fil|
|00000d10| 65 20 6f 77 6e 65 72 2e | 0a 49 66 20 6e 69 6c 2c |e owner.|.If nil,|
|00000d20| 20 6d 65 61 6e 73 20 6f | 6e 6c 79 20 62 75 66 66 | means o|nly buff|
|00000d30| 65 72 20 66 69 6c 65 73 | 20 6b 6e 6f 77 6e 20 74 |er files| known t|
|00000d40| 6f 20 62 65 20 6f 77 6e | 65 64 20 62 79 20 79 6f |o be own|ed by yo|
|00000d50| 75 20 63 61 6e 20 68 61 | 76 65 20 61 73 73 6f 63 |u can ha|ve assoc|
|00000d60| 69 61 74 65 64 0a 46 6f | 6e 74 20 4c 6f 63 6b 20 |iated.Fo|nt Lock |
|00000d70| 63 61 63 68 65 20 66 69 | 6c 65 73 20 73 61 76 65 |cache fi|les save|
|00000d80| 64 2e 20 20 4f 77 6e 65 | 72 73 68 69 70 20 6d 61 |d.  Owne|rship ma|
|00000d90| 79 20 62 65 20 75 6e 6b | 6e 6f 77 6e 20 66 6f 72 |y be unk|nown for|
|00000da0| 20 6e 65 74 77 6f 72 6b | 65 64 20 66 69 6c 65 73 | network|ed files|
|00000db0| 2e 1f 0a 28 64 65 66 76 | 61 72 20 66 61 73 74 2d |...(defv|ar fast-|
|00000dc0| 6c 6f 63 6b 2d 73 61 76 | 65 2d 6f 74 68 65 72 73 |lock-sav|e-others|
|00000dd0| 20 74 20 28 23 24 20 2e | 20 2d 33 32 38 35 29 29 | t (#$ .| -3285))|
|00000de0| 0a 23 40 31 30 38 20 46 | 61 63 65 73 20 74 68 61 |.#@108 F|aces tha|
|00000df0| 74 20 77 69 6c 6c 20 62 | 65 20 73 61 76 65 64 20 |t will b|e saved |
|00000e00| 69 6e 20 61 20 46 6f 6e | 74 20 4c 6f 63 6b 20 63 |in a Fon|t Lock c|
|00000e10| 61 63 68 65 20 66 69 6c | 65 2e 0a 49 66 20 6e 69 |ache fil|e..If ni|
|00000e20| 6c 2c 20 6d 65 61 6e 73 | 20 69 6e 66 6f 72 6d 61 |l, means| informa|
|00000e30| 74 69 6f 6e 20 66 6f 72 | 20 61 6c 6c 20 66 61 63 |tion for| all fac|
|00000e40| 65 73 20 77 69 6c 6c 20 | 62 65 20 73 61 76 65 64 |es will |be saved|
|00000e50| 2e 1f 0a 28 64 65 66 76 | 61 72 20 66 61 73 74 2d |...(defv|ar fast-|
|00000e60| 6c 6f 63 6b 2d 73 61 76 | 65 2d 66 61 63 65 73 20 |lock-sav|e-faces |
|00000e70| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 20 19 c2 |(byte-co|de ". ..|
|00000e80| 8e c3 c4 c5 20 5c 22 2a | 85 10 00 0e 06 87 22 20 |.... \"*|......" |
|00000e90| 5b 6d 61 74 63 68 2d 64 | 61 74 61 20 6d 61 74 63 |[match-d|ata matc|
|00000ea0| 68 2d 64 61 74 61 20 28 | 28 73 74 6f 72 65 2d 6d |h-data (|(store-m|
|00000eb0| 61 74 63 68 2d 64 61 74 | 61 20 6d 61 74 63 68 2d |atch-dat|a match-|
|00000ec0| 64 61 74 61 29 29 20 73 | 74 72 69 6e 67 2d 6d 61 |data)) s|tring-ma|
|00000ed0| 74 63 68 20 22 58 45 6d | 61 63 73 22 20 65 6d 61 |tch "XEm|acs" ema|
|00000ee0| 63 73 2d 76 65 72 73 69 | 6f 6e 20 66 6f 6e 74 2d |cs-versi|on font-|
|00000ef0| 6c 6f 63 6b 2d 66 61 63 | 65 2d 6c 69 73 74 5d 20 |lock-fac|e-list] |
|00000f00| 33 29 20 28 23 24 20 2e | 20 33 35 35 39 29 29 0a |3) (#$ .| 3559)).|
|00000f10| 23 40 31 31 39 34 20 54 | 6f 67 67 6c 65 20 46 61 |#@1194 T|oggle Fa|
|00000f20| 73 74 20 4c 6f 63 6b 20 | 6d 6f 64 65 2e 0a 57 69 |st Lock |mode..Wi|
|00000f30| 74 68 20 61 72 67 2c 20 | 74 75 72 6e 20 46 61 73 |th arg, |turn Fas|
|00000f40| 74 20 4c 6f 63 6b 20 6d | 6f 64 65 20 6f 6e 20 69 |t Lock m|ode on i|
|00000f50| 66 20 61 6e 64 20 6f 6e | 6c 79 20 69 66 20 61 72 |f and on|ly if ar|
|00000f60| 67 20 69 73 20 70 6f 73 | 69 74 69 76 65 20 61 6e |g is pos|itive an|
|00000f70| 64 20 74 68 65 20 62 75 | 66 66 65 72 0a 69 73 20 |d the bu|ffer.is |
|00000f80| 61 73 73 6f 63 69 61 74 | 65 64 20 77 69 74 68 20 |associat|ed with |
|00000f90| 61 20 66 69 6c 65 2e 20 | 20 45 6e 61 62 6c 65 20 |a file. | Enable |
|00000fa0| 69 74 20 61 75 74 6f 6d | 61 74 69 63 61 6c 6c 79 |it autom|atically|
|00000fb0| 20 69 6e 20 79 6f 75 72 | 20 60 7e 2f 2e 65 6d 61 | in your| `~/.ema|
|00000fc0| 63 73 27 20 62 79 3a 0a | 0a 20 28 73 65 74 71 20 |cs' by:.|. (setq |
|00000fd0| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 73 75 70 70 6f 72 |font-loc|k-suppor|
|00000fe0| 74 2d 6d 6f 64 65 20 27 | 66 61 73 74 2d 6c 6f 63 |t-mode '|fast-loc|
|00000ff0| 6b 2d 6d 6f 64 65 29 0a | 0a 49 66 20 46 61 73 74 |k-mode).|.If Fast|
|00001000| 20 4c 6f 63 6b 20 6d 6f | 64 65 20 69 73 20 65 6e | Lock mo|de is en|
|00001010| 61 62 6c 65 64 2c 20 61 | 6e 64 20 74 68 65 20 63 |abled, a|nd the c|
|00001020| 75 72 72 65 6e 74 20 62 | 75 66 66 65 72 20 64 6f |urrent b|uffer do|
|00001030| 65 73 20 6e 6f 74 20 63 | 6f 6e 74 61 69 6e 20 61 |es not c|ontain a|
|00001040| 6e 79 20 74 65 78 74 0a | 70 72 6f 70 65 72 74 69 |ny text.|properti|
|00001050| 65 73 2c 20 61 6e 79 20 | 61 73 73 6f 63 69 61 74 |es, any |associat|
|00001060| 65 64 20 46 6f 6e 74 20 | 4c 6f 63 6b 20 63 61 63 |ed Font |Lock cac|
|00001070| 68 65 20 69 73 20 75 73 | 65 64 20 69 66 20 69 74 |he is us|ed if it|
|00001080| 73 20 74 69 6d 65 73 74 | 61 6d 70 20 6d 61 74 63 |s timest|amp matc|
|00001090| 68 65 73 20 74 68 65 0a | 62 75 66 66 65 72 27 73 |hes the.|buffer's|
|000010a0| 20 66 69 6c 65 2c 20 61 | 6e 64 20 69 74 73 20 60 | file, a|nd its `|
|000010b0| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 6b 65 79 77 6f 72 |font-loc|k-keywor|
|000010c0| 64 73 27 20 6d 61 74 63 | 68 20 74 68 6f 73 65 20 |ds' matc|h those |
|000010d0| 74 68 61 74 20 79 6f 75 | 20 61 72 65 20 75 73 69 |that you| are usi|
|000010e0| 6e 67 2e 0a 0a 46 6f 6e | 74 20 4c 6f 63 6b 20 63 |ng...Fon|t Lock c|
|000010f0| 61 63 68 65 73 20 6d 61 | 79 20 62 65 20 73 61 76 |aches ma|y be sav|
|00001100| 65 64 3a 0a 20 2d 20 57 | 68 65 6e 20 79 6f 75 20 |ed:. - W|hen you |
|00001110| 73 61 76 65 20 74 68 65 | 20 66 69 6c 65 27 73 20 |save the| file's |
|00001120| 62 75 66 66 65 72 2e 0a | 20 2d 20 57 68 65 6e 20 |buffer..| - When |
|00001130| 79 6f 75 20 6b 69 6c 6c | 20 61 6e 20 75 6e 6d 6f |you kill| an unmo|
|00001140| 64 69 66 69 65 64 20 66 | 69 6c 65 27 73 20 62 75 |dified f|ile's bu|
|00001150| 66 66 65 72 2e 0a 20 2d | 20 57 68 65 6e 20 79 6f |ffer.. -| When yo|
|00001160| 75 20 65 78 69 74 20 45 | 6d 61 63 73 2c 20 66 6f |u exit E|macs, fo|
|00001170| 72 20 61 6c 6c 20 75 6e | 6d 6f 64 69 66 69 65 64 |r all un|modified|
|00001180| 20 6f 72 20 73 61 76 65 | 64 20 62 75 66 66 65 72 | or save|d buffer|
|00001190| 73 2e 0a 44 65 70 65 6e | 64 69 6e 67 20 6f 6e 20 |s..Depen|ding on |
|000011a0| 74 68 65 20 76 61 6c 75 | 65 20 6f 66 20 60 66 61 |the valu|e of `fa|
|000011b0| 73 74 2d 6c 6f 63 6b 2d | 73 61 76 65 2d 65 76 65 |st-lock-|save-eve|
|000011c0| 6e 74 73 27 2e 0a 53 65 | 65 20 61 6c 73 6f 20 74 |nts'..Se|e also t|
|000011d0| 68 65 20 63 6f 6d 6d 61 | 6e 64 73 20 60 66 61 73 |he comma|nds `fas|
|000011e0| 74 2d 6c 6f 63 6b 2d 72 | 65 61 64 2d 63 61 63 68 |t-lock-r|ead-cach|
|000011f0| 65 27 20 61 6e 64 20 60 | 66 61 73 74 2d 6c 6f 63 |e' and `|fast-loc|
|00001200| 6b 2d 73 61 76 65 2d 63 | 61 63 68 65 27 2e 0a 0a |k-save-c|ache'...|
|00001210| 55 73 65 20 5c 5b 66 6f | 6e 74 2d 6c 6f 63 6b 2d |Use \[fo|nt-lock-|
|00001220| 66 6f 6e 74 69 66 79 2d | 62 75 66 66 65 72 5d 20 |fontify-|buffer] |
|00001230| 74 6f 20 66 6f 6e 74 69 | 66 79 20 74 68 65 20 62 |to fonti|fy the b|
|00001240| 75 66 66 65 72 20 69 66 | 20 74 68 65 20 63 61 63 |uffer if| the cac|
|00001250| 68 65 20 69 73 20 62 61 | 64 2e 0a 0a 56 61 72 69 |he is ba|d...Vari|
|00001260| 6f 75 73 20 6d 65 74 68 | 6f 64 73 20 6f 66 20 63 |ous meth|ods of c|
|00001270| 6f 6e 74 72 6f 6c 20 61 | 72 65 20 70 72 6f 76 69 |ontrol a|re provi|
|00001280| 64 65 64 20 66 6f 72 20 | 74 68 65 20 46 6f 6e 74 |ded for |the Font|
|00001290| 20 4c 6f 63 6b 20 63 61 | 63 68 65 2e 20 20 49 6e | Lock ca|che.  In|
|000012a0| 20 67 65 6e 65 72 61 6c | 2c 0a 73 65 65 20 76 61 | general|,.see va|
|000012b0| 72 69 61 62 6c 65 20 60 | 66 61 73 74 2d 6c 6f 63 |riable `|fast-loc|
|000012c0| 6b 2d 63 61 63 68 65 2d | 64 69 72 65 63 74 6f 72 |k-cache-|director|
|000012d0| 69 65 73 27 20 61 6e 64 | 20 66 75 6e 63 74 69 6f |ies' and| functio|
|000012e0| 6e 20 60 66 61 73 74 2d | 6c 6f 63 6b 2d 63 61 63 |n `fast-|lock-cac|
|000012f0| 68 65 2d 6e 61 6d 65 27 | 2e 0a 46 6f 72 20 73 61 |he-name'|..For sa|
|00001300| 76 69 6e 67 2c 20 73 65 | 65 20 76 61 72 69 61 62 |ving, se|e variab|
|00001310| 6c 65 73 20 60 66 61 73 | 74 2d 6c 6f 63 6b 2d 6d |les `fas|t-lock-m|
|00001320| 69 6e 69 6d 75 6d 2d 73 | 69 7a 65 27 2c 20 60 66 |inimum-s|ize', `f|
|00001330| 61 73 74 2d 6c 6f 63 6b | 2d 73 61 76 65 2d 65 76 |ast-lock|-save-ev|
|00001340| 65 6e 74 73 27 2c 0a 60 | 66 61 73 74 2d 6c 6f 63 |ents',.`|fast-loc|
|00001350| 6b 2d 73 61 76 65 2d 6f | 74 68 65 72 73 27 20 61 |k-save-o|thers' a|
|00001360| 6e 64 20 60 66 61 73 74 | 2d 6c 6f 63 6b 2d 73 61 |nd `fast|-lock-sa|
|00001370| 76 65 2d 66 61 63 65 73 | 27 2e 0a 0a 55 73 65 20 |ve-faces|'...Use |
|00001380| 5c 5b 66 61 73 74 2d 6c | 6f 63 6b 2d 73 75 62 6d |\[fast-l|ock-subm|
|00001390| 69 74 2d 62 75 67 2d 72 | 65 70 6f 72 74 5d 20 74 |it-bug-r|eport] t|
|000013a0| 6f 20 73 65 6e 64 20 62 | 75 67 20 72 65 70 6f 72 |o send b|ug repor|
|000013b0| 74 73 20 6f 72 20 66 65 | 65 64 62 61 63 6b 2e 1f |ts or fe|edback..|
|000013c0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 66 61 73 74 |.(defali|as 'fast|
|000013d0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 20 23 5b 28 26 6f |-lock-mo|de #[(&o|
|000013e0| 70 74 69 6f 6e 61 6c 20 | 61 72 67 29 20 23 40 33 |ptional |arg) #@3|
|000013f0| 34 31 20 28 22 c0 c1 21 | 5c 6e 85 1c 01 30 c1 0b |41 ("..!|\n...0..|
|00001400| 3e 3f 85 1c 01 30 5c 66 | 83 1a 01 30 c5 5c 66 21 |>?...0\f|...0.\f!|
|00001410| c6 56 82 1c 01 30 09 3f | 4c 88 09 83 2f 01 30 0e |.V...0.?|L.../.0.|
|00001420| 07 84 2f 01 30 c1 1e 08 | c7 c9 21 29 87 c0 ca 21 |../.0...|..!)...!|
|00001430| cb 4c 88 c0 cc 21 cb 4c | 88 09 85 47 01 30 0e 0d |.L...!.L|...G.0..|
|00001440| 3f 85 47 01 30 ce 20 87 | 22 20 2e 20 5b 6d 61 6b |?.G.0. .|" . [mak|
|00001450| 65 2d 6c 6f 63 61 6c 2d | 76 61 72 69 61 62 6c 65 |e-local-|variable|
|00001460| 20 66 61 73 74 2d 6c 6f | 63 6b 2d 6d 6f 64 65 20 | fast-lo|ck-mode |
|00001470| 62 75 66 66 65 72 2d 66 | 69 6c 65 2d 74 72 75 65 |buffer-f|ile-true|
|00001480| 6e 61 6d 65 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 69 |name fon|t-lock-i|
|00001490| 6e 68 69 62 69 74 2d 74 | 68 69 6e 67 2d 6c 6f 63 |nhibit-t|hing-loc|
|000014a0| 6b 20 61 72 67 20 70 72 | 65 66 69 78 2d 6e 75 6d |k arg pr|efix-num|
|000014b0| 65 72 69 63 2d 76 61 6c | 75 65 20 30 20 66 6f 6e |eric-val|ue 0 fon|
|000014c0| 74 2d 6c 6f 63 6b 2d 6d | 6f 64 65 20 66 6f 6e 74 |t-lock-m|ode font|
|000014d0| 2d 6c 6f 63 6b 2d 73 75 | 70 70 6f 72 74 2d 6d 6f |-lock-su|pport-mo|
|000014e0| 64 65 20 74 20 66 61 73 | 74 2d 6c 6f 63 6b 2d 63 |de t fas|t-lock-c|
|000014f0| 61 63 68 65 2d 74 69 6d | 65 73 74 61 6d 70 20 6e |ache-tim|estamp n|
|00001500| 69 6c 20 66 61 73 74 2d | 6c 6f 63 6b 2d 63 61 63 |il fast-|lock-cac|
|00001510| 68 65 2d 66 69 6c 65 6e | 61 6d 65 20 66 6f 6e 74 |he-filen|ame font|
|00001520| 2d 6c 6f 63 6b 2d 66 6f | 6e 74 69 66 69 65 64 20 |-lock-fo|ntified |
|00001530| 66 61 73 74 2d 6c 6f 63 | 6b 2d 72 65 61 64 2d 63 |fast-loc|k-read-c|
|00001540| 61 63 68 65 5d 29 1f 28 | 23 24 20 2e 20 35 31 30 |ache]).(|#$ . 510|
|00001550| 37 29 20 6e 69 6c 20 33 | 20 28 23 24 20 2e 20 33 |7) nil 3| (#$ . 3|
|00001560| 38 36 33 29 20 22 50 22 | 5d 29 0a 23 40 34 30 35 |863) "P"|]).#@405|
|00001570| 20 52 65 61 64 20 74 68 | 65 20 46 6f 6e 74 20 4c | Read th|e Font L|
|00001580| 6f 63 6b 20 63 61 63 68 | 65 20 66 6f 72 20 74 68 |ock cach|e for th|
|00001590| 65 20 63 75 72 72 65 6e | 74 20 62 75 66 66 65 72 |e curren|t buffer|
|000015a0| 2e 0a 0a 54 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |...The f|ollowing|
|000015b0| 20 63 72 69 74 65 72 69 | 61 20 6d 75 73 74 20 62 | criteri|a must b|
|000015c0| 65 20 6d 65 74 20 66 6f | 72 20 61 20 46 6f 6e 74 |e met fo|r a Font|
|000015d0| 20 4c 6f 63 6b 20 63 61 | 63 68 65 20 66 69 6c 65 | Lock ca|che file|
|000015e0| 20 74 6f 20 62 65 20 72 | 65 61 64 3a 0a 20 2d 20 | to be r|ead:. - |
|000015f0| 46 61 73 74 20 4c 6f 63 | 6b 20 6d 6f 64 65 20 6d |Fast Loc|k mode m|
|00001600| 75 73 74 20 62 65 20 74 | 75 72 6e 65 64 20 6f 6e |ust be t|urned on|
|00001610| 20 69 6e 20 74 68 65 20 | 62 75 66 66 65 72 2e 0a | in the |buffer..|
|00001620| 20 2d 20 54 68 65 20 62 | 75 66 66 65 72 20 6d 75 | - The b|uffer mu|
|00001630| 73 74 20 6e 6f 74 20 62 | 65 20 6d 6f 64 69 66 69 |st not b|e modifi|
|00001640| 65 64 2e 0a 20 2d 20 54 | 68 65 20 62 75 66 66 65 |ed.. - T|he buffe|
|00001650| 72 27 73 20 60 66 6f 6e | 74 2d 6c 6f 63 6b 2d 6b |r's `fon|t-lock-k|
|00001660| 65 79 77 6f 72 64 73 27 | 20 6d 75 73 74 20 6d 61 |eywords'| must ma|
|00001670| 74 63 68 20 74 68 65 20 | 63 61 63 68 65 27 73 2e |tch the |cache's.|
|00001680| 0a 20 2d 20 54 68 65 20 | 62 75 66 66 65 72 20 66 |. - The |buffer f|
|00001690| 69 6c 65 27 73 20 74 69 | 6d 65 73 74 61 6d 70 20 |ile's ti|mestamp |
|000016a0| 6d 75 73 74 20 6d 61 74 | 63 68 20 74 68 65 20 63 |must mat|ch the c|
|000016b0| 61 63 68 65 27 73 2e 0a | 20 2d 20 43 72 69 74 65 |ache's..| - Crite|
|000016c0| 72 69 61 20 69 6d 70 6f | 73 65 64 20 62 79 20 60 |ria impo|sed by `|
|000016d0| 66 61 73 74 2d 6c 6f 63 | 6b 2d 63 61 63 68 65 2d |fast-loc|k-cache-|
|000016e0| 64 69 72 65 63 74 6f 72 | 69 65 73 27 2e 0a 0a 53 |director|ies'...S|
|000016f0| 65 65 20 60 66 61 73 74 | 2d 6c 6f 63 6b 2d 6d 6f |ee `fast|-lock-mo|
|00001700| 64 65 27 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |de'...(d|efalias |
|00001710| 27 66 61 73 74 2d 6c 6f | 63 6b 2d 72 65 61 64 2d |'fast-lo|ck-read-|
|00001720| 63 61 63 68 65 20 23 5b | 6e 69 6c 20 23 40 34 34 |cache #[|nil #@44|
|00001730| 38 20 28 22 08 c1 20 c2 | 0b 1c 1d 1e 06 1e 07 c8 |8 (".. .|........|
|00001740| c3 21 c9 4c 88 0e 07 83 | 30 01 30 0b 84 30 01 30 |.!.L....|0.0..0.0|
|00001750| ca 0e 07 40 c9 5c 22 1e | 0b c9 cc cd 8f 88 0e 07 |...@.\".|........|
|00001760| 41 16 07 29 82 11 01 30 | ce 0e 06 21 88 0b 3f 85 |A..)...0|...!..?.|
|00001770| 40 01 30 c9 16 0f 5c 66 | 89 13 2c 87 22 20 2e 20 |@.0...\f|..,." . |
|00001780| 5b 66 61 73 74 2d 6c 6f | 63 6b 2d 63 61 63 68 65 |[fast-lo|ck-cache|
|00001790| 2d 64 69 72 65 63 74 6f | 72 69 65 73 20 62 75 66 |-directo|ries buf|
|000017a0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 74 |fer-modi|fied-p t|
|000017b0| 20 66 6f 6e 74 2d 6c 6f | 63 6b 2d 66 6f 6e 74 69 | font-lo|ck-fonti|
|000017c0| 66 69 65 64 20 66 6f 6e | 74 69 66 69 65 64 20 69 |fied fon|tified i|
|000017d0| 6e 68 69 62 69 74 2d 72 | 65 61 64 2d 6f 6e 6c 79 |nhibit-r|ead-only|
|000017e0| 20 6d 6f 64 69 66 69 65 | 64 20 64 69 72 65 63 74 | modifie|d direct|
|000017f0| 6f 72 69 65 73 20 6d 61 | 6b 65 2d 6c 6f 63 61 6c |ories ma|ke-local|
|00001800| 2d 76 61 72 69 61 62 6c | 65 20 6e 69 6c 20 66 61 |-variabl|e nil fa|
|00001810| 73 74 2d 6c 6f 63 6b 2d | 63 61 63 68 65 2d 64 69 |st-lock-|cache-di|
|00001820| 72 65 63 74 6f 72 79 20 | 64 69 72 65 63 74 6f 72 |rectory |director|
|00001830| 79 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 08 83 |y (byte-|code "..|
|00001840| 15 01 30 c1 08 21 12 c3 | 5c 6e 21 83 15 01 30 c4 |..0..!..|\n!...0.|
|00001850| 5c 6e c5 89 89 24 88 c1 | 87 22 20 5b 64 69 72 65 |\n...$..|." [dire|
|00001860| 63 74 6f 72 79 20 66 61 | 73 74 2d 6c 6f 63 6b 2d |ctory fa|st-lock-|
|00001870| 63 61 63 68 65 2d 6e 61 | 6d 65 20 66 61 73 74 2d |cache-na|me fast-|
|00001880| 6c 6f 63 6b 2d 63 61 63 | 68 65 2d 66 69 6c 65 6e |lock-cac|he-filen|
|00001890| 61 6d 65 20 66 69 6c 65 | 2d 72 65 61 64 61 62 6c |ame file|-readabl|
|000018a0| 65 2d 70 20 6c 6f 61 64 | 20 74 5d 20 35 29 20 28 |e-p load| t] 5) (|
|000018b0| 28 65 72 72 6f 72 29 20 | 28 71 75 69 74 29 29 20 |(error) |(quit)) |
|000018c0| 73 65 74 2d 62 75 66 66 | 65 72 2d 6d 6f 64 69 66 |set-buff|er-modif|
|000018d0| 69 65 64 2d 70 20 66 61 | 73 74 2d 6c 6f 63 6b 2d |ied-p fa|st-lock-|
|000018e0| 63 61 63 68 65 2d 66 69 | 6c 65 6e 61 6d 65 5d 29 |cache-fi|lename])|
|000018f0| 1f 28 23 24 20 2e 20 35 | 39 33 38 29 20 6e 69 6c |.(#$ . 5|938) nil|
|00001900| 20 34 20 28 23 24 20 2e | 20 35 34 38 39 29 20 6e | 4 (#$ .| 5489) n|
|00001910| 69 6c 5d 29 0a 23 40 37 | 30 37 20 53 61 76 65 20 |il]).#@7|07 Save |
|00001920| 74 68 65 20 46 6f 6e 74 | 20 4c 6f 63 6b 20 63 61 |the Font| Lock ca|
|00001930| 63 68 65 20 6f 66 20 42 | 55 46 46 45 52 20 6f 72 |che of B|UFFER or|
|00001940| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 62 75 66 | the cur|rent buf|
|00001950| 66 65 72 2e 0a 0a 54 68 | 65 20 66 6f 6c 6c 6f 77 |fer...Th|e follow|
|00001960| 69 6e 67 20 63 72 69 74 | 65 72 69 61 20 6d 75 73 |ing crit|eria mus|
|00001970| 74 20 62 65 20 6d 65 74 | 20 66 6f 72 20 61 20 46 |t be met| for a F|
|00001980| 6f 6e 74 20 4c 6f 63 6b | 20 63 61 63 68 65 20 66 |ont Lock| cache f|
|00001990| 69 6c 65 20 74 6f 20 62 | 65 20 73 61 76 65 64 3a |ile to b|e saved:|
|000019a0| 0a 20 2d 20 46 61 73 74 | 20 4c 6f 63 6b 20 6d 6f |. - Fast| Lock mo|
|000019b0| 64 65 20 6d 75 73 74 20 | 62 65 20 74 75 72 6e 65 |de must |be turne|
|000019c0| 64 20 6f 6e 20 69 6e 20 | 74 68 65 20 62 75 66 66 |d on in |the buff|
|000019d0| 65 72 2e 0a 20 2d 20 54 | 68 65 20 65 76 65 6e 74 |er.. - T|he event|
|000019e0| 20 6d 75 73 74 20 62 65 | 20 6f 6e 65 20 6f 66 20 | must be| one of |
|000019f0| 60 66 61 73 74 2d 6c 6f | 63 6b 2d 73 61 76 65 2d |`fast-lo|ck-save-|
|00001a00| 65 76 65 6e 74 73 27 2e | 0a 20 2d 20 54 68 65 20 |events'.|. - The |
|00001a10| 62 75 66 66 65 72 20 6d | 75 73 74 20 62 65 20 61 |buffer m|ust be a|
|00001a20| 74 20 6c 65 61 73 74 20 | 60 66 61 73 74 2d 6c 6f |t least |`fast-lo|
|00001a30| 63 6b 2d 6d 69 6e 69 6d | 75 6d 2d 73 69 7a 65 27 |ck-minim|um-size'|
|00001a40| 20 62 79 74 65 73 20 6c | 6f 6e 67 2e 0a 20 2d 20 | bytes l|ong.. - |
|00001a50| 54 68 65 20 62 75 66 66 | 65 72 20 66 69 6c 65 20 |The buff|er file |
|00001a60| 6d 75 73 74 20 62 65 20 | 6f 77 6e 65 64 20 62 79 |must be |owned by|
|00001a70| 20 79 6f 75 2c 20 6f 72 | 20 60 66 61 73 74 2d 6c | you, or| `fast-l|
|00001a80| 6f 63 6b 2d 73 61 76 65 | 2d 6f 74 68 65 72 73 27 |ock-save|-others'|
|00001a90| 20 6d 75 73 74 20 62 65 | 20 74 2e 0a 20 2d 20 54 | must be| t.. - T|
|00001aa0| 68 65 20 62 75 66 66 65 | 72 20 6d 75 73 74 20 63 |he buffe|r must c|
|00001ab0| 6f 6e 74 61 69 6e 20 61 | 74 20 6c 65 61 73 74 20 |ontain a|t least |
|00001ac0| 6f 6e 65 20 60 66 61 63 | 65 27 20 74 65 78 74 20 |one `fac|e' text |
|00001ad0| 70 72 6f 70 65 72 74 79 | 2e 0a 20 2d 20 54 68 65 |property|.. - The|
|00001ae0| 20 62 75 66 66 65 72 20 | 6d 75 73 74 20 6e 6f 74 | buffer |must not|
|00001af0| 20 62 65 20 6d 6f 64 69 | 66 69 65 64 2e 0a 20 2d | be modi|fied.. -|
|00001b00| 20 54 68 65 20 62 75 66 | 66 65 72 20 66 69 6c 65 | The buf|fer file|
|00001b10| 27 73 20 74 69 6d 65 73 | 74 61 6d 70 20 6d 75 73 |'s times|tamp mus|
|00001b20| 74 20 62 65 20 74 68 65 | 20 73 61 6d 65 20 61 73 |t be the| same as|
|00001b30| 20 74 68 65 20 66 69 6c | 65 27 73 20 6f 6e 20 64 | the fil|e's on d|
|00001b40| 69 73 6b 2e 0a 20 2d 20 | 54 68 65 20 6f 6e 20 64 |isk.. - |The on d|
|00001b50| 69 73 6b 20 66 69 6c 65 | 27 73 20 74 69 6d 65 73 |isk file|'s times|
|00001b60| 74 61 6d 70 20 6d 75 73 | 74 20 62 65 20 64 69 66 |tamp mus|t be dif|
|00001b70| 66 65 72 65 6e 74 20 74 | 68 61 6e 20 74 68 65 20 |ferent t|han the |
|00001b80| 62 75 66 66 65 72 27 73 | 20 63 61 63 68 65 2e 0a |buffer's| cache..|
|00001b90| 20 2d 20 43 72 69 74 65 | 72 69 61 20 69 6d 70 6f | - Crite|ria impo|
|00001ba0| 73 65 64 20 62 79 20 60 | 66 61 73 74 2d 6c 6f 63 |sed by `|fast-loc|
|00001bb0| 6b 2d 63 61 63 68 65 2d | 64 69 72 65 63 74 6f 72 |k-cache-|director|
|00001bc0| 69 65 73 27 2e 0a 0a 53 | 65 65 20 60 66 61 73 74 |ies'...S|ee `fast|
|00001bd0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 27 2e 1f 0a 28 64 |-lock-mo|de'...(d|
|00001be0| 65 66 61 6c 69 61 73 20 | 27 66 61 73 74 2d 6c 6f |efalias |'fast-lo|
|00001bf0| 63 6b 2d 73 61 76 65 2d | 63 61 63 68 65 20 23 5b |ck-save-|cache #[|
|00001c00| 28 26 6f 70 74 69 6f 6e | 61 6c 20 62 75 66 66 65 |(&option|al buffe|
|00001c10| 72 29 20 23 40 36 33 32 | 20 28 22 8a 08 83 08 01 |r) #@632| (".....|
|00001c20| 30 08 71 88 c1 5c 6e 21 | c3 20 c4 1d 1e 06 1e 07 |0.q..\n!|. ......|
|00001c30| 0e 08 85 91 01 30 c9 20 | 3f 85 91 01 30 ca 70 21 |.....0. |?...0.p!|
|00001c40| 85 91 01 30 0e 0b 0e 06 | 9a 3f 85 91 01 30 0e 07 |...0....|.?...0..|
|00001c50| 85 91 01 30 cc 20 0e 07 | 59 85 91 01 30 0e 0d 84 |...0. ..|Y...0...|
|00001c60| 4b 01 30 ce 20 cf d0 0e | 11 21 38 3d 85 91 01 30 |K.0. ...|.!8=...0|
|00001c70| d2 65 64 d3 c4 24 85 91 | 01 30 0e 14 1e 15 0e 15 |.ed..$..|.0......|
|00001c80| 85 90 01 30 0d d6 3e 85 | 90 01 30 d7 0e 15 40 d8 |...0..>.|..0...@.|
|00001c90| 5c 22 89 1e 19 85 73 01 | 30 da 0e 19 21 89 1e 1b |\"....s.|0...!...|
|00001ca0| 83 87 01 30 dc 0e 1b 21 | 83 87 01 30 dd 0e 1b 0e |...0...!|...0....|
|00001cb0| 06 5c 22 15 0e 15 41 16 | 15 2a 82 58 01 30 29 2c |.\"...A.|.*.X.0),|
|00001cc0| 87 22 20 2e 20 5b 62 75 | 66 66 65 72 20 66 6f 6e |." . [bu|ffer fon|
|00001cd0| 74 2d 6c 6f 63 6b 2d 76 | 61 6c 75 65 2d 69 6e 2d |t-lock-v|alue-in-|
|00001ce0| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 66 61 73 74 2d |major-mo|de fast-|
|00001cf0| 6c 6f 63 6b 2d 6d 69 6e | 69 6d 75 6d 2d 73 69 7a |lock-min|imum-siz|
|00001d00| 65 20 76 69 73 69 74 65 | 64 2d 66 69 6c 65 2d 6d |e visite|d-file-m|
|00001d10| 6f 64 74 69 6d 65 20 6e | 69 6c 20 73 61 76 65 64 |odtime n|il saved|
|00001d20| 20 66 69 6c 65 2d 74 69 | 6d 65 73 74 61 6d 70 20 | file-ti|mestamp |
|00001d30| 6d 69 6e 2d 73 69 7a 65 | 20 66 61 73 74 2d 6c 6f |min-size| fast-lo|
|00001d40| 63 6b 2d 6d 6f 64 65 20 | 62 75 66 66 65 72 2d 6d |ck-mode |buffer-m|
|00001d50| 6f 64 69 66 69 65 64 2d | 70 20 76 65 72 69 66 79 |odified-|p verify|
|00001d60| 2d 76 69 73 69 74 65 64 | 2d 66 69 6c 65 2d 6d 6f |-visited|-file-mo|
|00001d70| 64 74 69 6d 65 20 66 61 | 73 74 2d 6c 6f 63 6b 2d |dtime fa|st-lock-|
|00001d80| 63 61 63 68 65 2d 74 69 | 6d 65 73 74 61 6d 70 20 |cache-ti|mestamp |
|00001d90| 62 75 66 66 65 72 2d 73 | 69 7a 65 20 66 61 73 74 |buffer-s|ize fast|
|00001da0| 2d 6c 6f 63 6b 2d 73 61 | 76 65 2d 6f 74 68 65 72 |-lock-sa|ve-other|
|00001db0| 73 20 75 73 65 72 2d 75 | 69 64 20 32 20 66 69 6c |s user-u|id 2 fil|
|00001dc0| 65 2d 61 74 74 72 69 62 | 75 74 65 73 20 62 75 66 |e-attrib|utes buf|
|00001dd0| 66 65 72 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 74 65 |fer-file|-name te|
|00001de0| 78 74 2d 70 72 6f 70 65 | 72 74 79 2d 6e 6f 74 2d |xt-prope|rty-not-|
|00001df0| 61 6c 6c 20 66 61 63 65 | 20 66 61 73 74 2d 6c 6f |all face| fast-lo|
|00001e00| 63 6b 2d 63 61 63 68 65 | 2d 64 69 72 65 63 74 6f |ck-cache|-directo|
|00001e10| 72 69 65 73 20 64 69 72 | 65 63 74 6f 72 69 65 73 |ries dir|ectories|
|00001e20| 20 28 6e 69 6c 20 65 72 | 72 6f 72 29 20 66 61 73 | (nil er|ror) fas|
|00001e30| 74 2d 6c 6f 63 6b 2d 63 | 61 63 68 65 2d 64 69 72 |t-lock-c|ache-dir|
|00001e40| 65 63 74 6f 72 79 20 74 | 20 64 69 72 20 66 61 73 |ectory t| dir fas|
|00001e50| 74 2d 6c 6f 63 6b 2d 63 | 61 63 68 65 2d 6e 61 6d |t-lock-c|ache-nam|
|00001e60| 65 20 66 69 6c 65 20 66 | 69 6c 65 2d 77 72 69 74 |e file f|ile-writ|
|00001e70| 61 62 6c 65 2d 70 20 66 | 61 73 74 2d 6c 6f 63 6b |able-p f|ast-lock|
|00001e80| 2d 73 61 76 65 2d 63 61 | 63 68 65 2d 31 5d 29 1f |-save-ca|che-1]).|
|00001e90| 28 23 24 20 2e 20 37 31 | 39 33 29 20 6e 69 6c 20 |(#$ . 71|93) nil |
|00001ea0| 36 20 28 23 24 20 2e 20 | 36 34 32 37 29 20 6e 69 |6 (#$ . |6427) ni|
|00001eb0| 6c 5d 29 0a 23 40 34 31 | 20 55 6e 63 6f 6e 64 69 |l]).#@41| Uncondi|
|00001ec0| 74 69 6f 6e 61 6c 6c 79 | 20 74 75 72 6e 20 6f 6e |tionally| turn on|
|00001ed0| 20 46 61 73 74 20 4c 6f | 63 6b 20 6d 6f 64 65 2e | Fast Lo|ck mode.|
|00001ee0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 74 75 72 |..(defal|ias 'tur|
|00001ef0| 6e 2d 6f 6e 2d 66 61 73 | 74 2d 6c 6f 63 6b 20 23 |n-on-fas|t-lock #|
|00001f00| 5b 6e 69 6c 20 23 40 33 | 31 20 28 22 c0 c1 21 87 |[nil #@3|1 ("..!.|
|00001f10| 22 20 2e 20 5b 66 61 73 | 74 2d 6c 6f 63 6b 2d 6d |" . [fas|t-lock-m|
|00001f20| 6f 64 65 20 74 5d 29 1f | 28 23 24 20 2e 20 37 39 |ode t]).|(#$ . 79|
|00001f30| 34 36 29 20 6e 69 6c 20 | 32 20 28 23 24 20 2e 20 |46) nil |2 (#$ . |
|00001f40| 37 38 36 35 29 5d 29 0a | 28 64 65 66 61 6c 69 61 |7865)]).|(defalia|
|00001f50| 73 20 27 66 61 73 74 2d | 6c 6f 63 6b 2d 61 66 74 |s 'fast-|lock-aft|
|00001f60| 65 72 2d 66 6f 6e 74 69 | 66 79 2d 62 75 66 66 65 |er-fonti|fy-buffe|
|00001f70| 72 20 23 5b 6e 69 6c 20 | 23 40 31 38 39 20 28 22 |r #[nil |#@189 ("|
|00001f80| 08 83 17 01 30 c1 08 21 | 83 11 01 30 c2 08 21 88 |....0..!|...0..!.|
|00001f90| 82 17 01 30 c3 c4 c5 20 | 5c 22 88 c6 89 16 07 87 |...0... |\"......|
|00001fa0| 22 20 2e 20 5b 66 61 73 | 74 2d 6c 6f 63 6b 2d 63 |" . [fas|t-lock-c|
|00001fb0| 61 63 68 65 2d 66 69 6c | 65 6e 61 6d 65 20 66 69 |ache-fil|ename fi|
|00001fc0| 6c 65 2d 77 72 69 74 61 | 62 6c 65 2d 70 20 64 65 |le-writa|ble-p de|
|00001fd0| 6c 65 74 65 2d 66 69 6c | 65 20 6d 65 73 73 61 67 |lete-fil|e messag|
|00001fe0| 65 20 22 46 69 6c 65 20 | 25 73 20 66 6f 6e 74 20 |e "File |%s font |
|00001ff0| 6c 6f 63 6b 20 63 61 63 | 68 65 20 63 61 6e 6e 6f |lock cac|he canno|
|00002000| 74 20 62 65 20 64 65 6c | 65 74 65 64 22 20 62 75 |t be del|eted" bu|
|00002010| 66 66 65 72 2d 6e 61 6d | 65 20 6e 69 6c 20 66 61 |ffer-nam|e nil fa|
|00002020| 73 74 2d 6c 6f 63 6b 2d | 63 61 63 68 65 2d 74 69 |st-lock-|cache-ti|
|00002030| 6d 65 73 74 61 6d 70 5d | 29 1f 28 23 24 20 2e 20 |mestamp]|).(#$ . |
|00002040| 38 30 36 32 29 20 6e 69 | 6c 20 33 5d 29 0a 28 64 |8062) ni|l 3]).(d|
|00002050| 65 66 61 6c 69 61 73 20 | 28 71 75 6f 74 65 20 66 |efalias |(quote f|
|00002060| 61 73 74 2d 6c 6f 63 6b | 2d 61 66 74 65 72 2d 75 |ast-lock|-after-u|
|00002070| 6e 66 6f 6e 74 69 66 79 | 2d 62 75 66 66 65 72 29 |nfontify|-buffer)|
|00002080| 20 28 71 75 6f 74 65 20 | 69 67 6e 6f 72 65 29 29 | (quote |ignore))|
|00002090| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 66 61 73 74 |.(defali|as 'fast|
|000020a0| 2d 6c 6f 63 6b 2d 73 61 | 76 65 2d 63 61 63 68 65 |-lock-sa|ve-cache|
|000020b0| 2d 61 66 74 65 72 2d 73 | 61 76 65 2d 66 69 6c 65 |-after-s|ave-file|
|000020c0| 20 23 5b 6e 69 6c 20 23 | 40 37 35 20 28 22 c0 09 | #[nil #|@75 ("..|
|000020d0| 3e 85 08 01 30 c2 20 87 | 22 20 2e 20 5b 73 61 76 |>...0. .|" . [sav|
|000020e0| 65 2d 62 75 66 66 65 72 | 20 66 61 73 74 2d 6c 6f |e-buffer| fast-lo|
|000020f0| 63 6b 2d 73 61 76 65 2d | 65 76 65 6e 74 73 20 66 |ck-save-|events f|
|00002100| 61 73 74 2d 6c 6f 63 6b | 2d 73 61 76 65 2d 63 61 |ast-lock|-save-ca|
|00002110| 63 68 65 5d 29 1f 28 23 | 24 20 2e 20 38 33 39 36 |che]).(#|$ . 8396|
|00002120| 29 20 6e 69 6c 20 32 5d | 29 0a 28 64 65 66 61 6c |) nil 2]|).(defal|
|00002130| 69 61 73 20 27 66 61 73 | 74 2d 6c 6f 63 6b 2d 73 |ias 'fas|t-lock-s|
|00002140| 61 76 65 2d 63 61 63 68 | 65 2d 62 65 66 6f 72 65 |ave-cach|e-before|
|00002150| 2d 6b 69 6c 6c 2d 62 75 | 66 66 65 72 20 23 5b 6e |-kill-bu|ffer #[n|
|00002160| 69 6c 20 23 40 37 35 20 | 28 22 c0 09 3e 85 08 01 |il #@75 |("..>...|
|00002170| 30 c2 20 87 22 20 2e 20 | 5b 6b 69 6c 6c 2d 62 75 |0. ." . |[kill-bu|
|00002180| 66 66 65 72 20 66 61 73 | 74 2d 6c 6f 63 6b 2d 73 |ffer fas|t-lock-s|
|00002190| 61 76 65 2d 65 76 65 6e | 74 73 20 66 61 73 74 2d |ave-even|ts fast-|
|000021a0| 6c 6f 63 6b 2d 73 61 76 | 65 2d 63 61 63 68 65 5d |lock-sav|e-cache]|
|000021b0| 29 1f 28 23 24 20 2e 20 | 38 35 35 32 29 20 6e 69 |).(#$ . |8552) ni|
|000021c0| 6c 20 32 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |l 2]).(d|efalias |
|000021d0| 27 66 61 73 74 2d 6c 6f | 63 6b 2d 73 61 76 65 2d |'fast-lo|ck-save-|
|000021e0| 63 61 63 68 65 73 2d 62 | 65 66 6f 72 65 2d 6b 69 |caches-b|efore-ki|
|000021f0| 6c 6c 2d 65 6d 61 63 73 | 20 23 5b 6e 69 6c 20 23 |ll-emacs| #[nil #|
|00002200| 40 39 37 20 28 22 c0 09 | 3e 85 0b 01 30 c2 c3 c4 |@97 ("..|>...0...|
|00002210| 20 5c 22 87 22 20 2e 20 | 5b 6b 69 6c 6c 2d 65 6d | \"." . |[kill-em|
|00002220| 61 63 73 20 66 61 73 74 | 2d 6c 6f 63 6b 2d 73 61 |acs fast|-lock-sa|
|00002230| 76 65 2d 65 76 65 6e 74 | 73 20 6d 61 70 63 61 72 |ve-event|s mapcar|
|00002240| 20 66 61 73 74 2d 6c 6f | 63 6b 2d 73 61 76 65 2d | fast-lo|ck-save-|
|00002250| 63 61 63 68 65 20 62 75 | 66 66 65 72 2d 6c 69 73 |cache bu|ffer-lis|
|00002260| 74 5d 29 1f 28 23 24 20 | 2e 20 38 37 30 38 29 20 |t]).(#$ |. 8708) |
|00002270| 6e 69 6c 20 33 5d 29 0a | 23 40 32 33 37 20 52 65 |nil 3]).|#@237 Re|
|00002280| 74 75 72 6e 20 75 73 61 | 62 6c 65 20 64 69 72 65 |turn usa|ble dire|
|00002290| 63 74 6f 72 79 20 62 61 | 73 65 64 20 6f 6e 20 44 |ctory ba|sed on D|
|000022a0| 49 52 45 43 54 4f 52 59 | 2e 0a 52 65 74 75 72 6e |IRECTORY|..Return|
|000022b0| 73 20 6e 69 6c 20 69 66 | 20 74 68 65 20 64 69 72 |s nil if| the dir|
|000022c0| 65 63 74 6f 72 79 20 64 | 6f 65 73 20 6e 6f 74 20 |ectory d|oes not |
|000022d0| 65 78 69 73 74 2c 20 6f | 72 2c 20 69 66 20 43 52 |exist, o|r, if CR|
|000022e0| 45 41 54 45 20 6e 6f 6e | 2d 6e 69 6c 2c 20 63 61 |EATE non|-nil, ca|
|000022f0| 6e 6e 6f 74 20 62 65 0a | 63 72 65 61 74 65 64 2e |nnot be.|created.|
|00002300| 20 20 44 49 52 45 43 54 | 4f 52 59 20 6d 61 79 20 |  DIRECT|ORY may |
|00002310| 62 65 20 61 20 73 74 72 | 69 6e 67 20 6f 72 20 61 |be a str|ing or a|
|00002320| 20 63 6f 6e 73 20 70 61 | 69 72 20 6f 66 20 74 68 | cons pa|ir of th|
|00002330| 65 20 66 6f 72 6d 20 28 | 52 45 47 45 58 50 20 2e |e form (|REGEXP .|
|00002340| 20 44 49 52 29 2e 0a 53 | 65 65 20 60 66 61 73 74 | DIR)..S|ee `fast|
|00002350| 2d 6c 6f 63 6b 2d 63 61 | 63 68 65 2d 64 69 72 65 |-lock-ca|che-dire|
|00002360| 63 74 6f 72 69 65 73 27 | 2e 1f 0a 28 64 65 66 61 |ctories'|...(defa|
|00002370| 6c 69 61 73 20 27 66 61 | 73 74 2d 6c 6f 63 6b 2d |lias 'fa|st-lock-|
|00002380| 63 61 63 68 65 2d 64 69 | 72 65 63 74 6f 72 79 20 |cache-di|rectory |
|00002390| 23 5b 28 64 69 72 65 63 | 74 6f 72 79 20 63 72 65 |#[(direc|tory cre|
|000023a0| 61 74 65 29 20 23 40 33 | 35 39 20 28 22 08 84 08 |ate) #@3|59 ("...|
|000023b0| 01 30 c1 82 2b 01 30 5c | 6e 3b 83 11 01 30 5c 6e |.0..+.0\|n;...0\n|
|000023c0| 82 2b 01 30 c3 5c 66 21 | c1 1d 1e 06 c7 20 1e 08 |.+.0.\f!|..... ..|
|000023d0| c9 8e ca 5c 6e 40 0e 06 | 5c 22 2a 85 2a 01 30 5c |...\n@..|\"*.*.0\|
|000023e0| 6e 41 2a 89 1e 0b 84 35 | 01 30 c1 82 4a 01 30 cc |nA*....5|.0..J.0.|
|000023f0| 0e 0b 21 83 41 01 30 0e | 0b 82 4a 01 30 0e 0d 85 |..!.A.0.|..J.0...|
|00002400| 4a 01 30 c1 ce cf 8f 29 | 87 22 20 2e 20 5b 62 75 |J.0....)|." . [bu|
|00002410| 66 66 65 72 2d 66 69 6c | 65 2d 6e 61 6d 65 20 6e |ffer-fil|e-name n|
|00002420| 69 6c 20 64 69 72 65 63 | 74 6f 72 79 20 65 78 70 |il direc|tory exp|
|00002430| 61 6e 64 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 62 75 |and-file|-name bu|
|00002440| 66 66 65 72 2d 66 69 6c | 65 2d 74 72 75 65 6e 61 |ffer-fil|e-truena|
|00002450| 6d 65 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |me case-|fold-sea|
|00002460| 72 63 68 20 62 75 66 69 | 6c 65 20 6d 61 74 63 68 |rch bufi|le match|
|00002470| 2d 64 61 74 61 20 6d 61 | 74 63 68 2d 64 61 74 61 |-data ma|tch-data|
|00002480| 20 28 28 73 74 6f 72 65 | 2d 6d 61 74 63 68 2d 64 | ((store|-match-d|
|00002490| 61 74 61 20 6d 61 74 63 | 68 2d 64 61 74 61 29 29 |ata matc|h-data))|
|000024a0| 20 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 64 69 | string-|match di|
|000024b0| 72 20 66 69 6c 65 2d 61 | 63 63 65 73 73 69 62 6c |r file-a|ccessibl|
|000024c0| 65 2d 64 69 72 65 63 74 | 6f 72 79 2d 70 20 63 72 |e-direct|ory-p cr|
|000024d0| 65 61 74 65 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |eate (by|te-code |
|000024e0| 22 c0 09 c2 5c 22 88 09 | 87 22 20 5b 6d 61 6b 65 |"...\"..|." [make|
|000024f0| 2d 64 69 72 65 63 74 6f | 72 79 20 64 69 72 20 74 |-directo|ry dir t|
|00002500| 5d 20 33 29 20 28 28 65 | 72 72 6f 72 29 29 5d 29 |] 3) ((e|rror))])|
|00002510| 1f 28 23 24 20 2e 20 39 | 31 33 31 29 20 6e 69 6c |.(#$ . 9|131) nil|
|00002520| 20 34 20 28 23 24 20 2e | 20 38 38 33 30 29 5d 29 | 4 (#$ .| 8830)])|
|00002530| 0a 23 40 37 33 39 20 52 | 65 74 75 72 6e 20 66 75 |.#@739 R|eturn fu|
|00002540| 6c 6c 20 63 61 63 68 65 | 20 70 61 74 68 20 6e 61 |ll cache| path na|
|00002550| 6d 65 20 75 73 69 6e 67 | 20 63 61 63 68 69 6e 67 |me using| caching|
|00002560| 20 44 49 52 45 43 54 4f | 52 59 2e 0a 49 66 20 44 | DIRECTO|RY..If D|
|00002570| 49 52 45 43 54 4f 52 59 | 20 69 73 20 60 2e 27 2c |IRECTORY| is `.',|
|00002580| 20 74 68 65 20 70 61 74 | 68 20 69 73 20 74 68 65 | the pat|h is the|
|00002590| 20 62 75 66 66 65 72 20 | 66 69 6c 65 20 6e 61 6d | buffer |file nam|
|000025a0| 65 20 61 70 70 65 6e 64 | 65 64 20 77 69 74 68 20 |e append|ed with |
|000025b0| 60 2e 66 6c 63 27 2e 0a | 4f 74 68 65 72 77 69 73 |`.flc'..|Otherwis|
|000025c0| 65 2c 20 74 68 65 20 70 | 61 74 68 20 6e 61 6d 65 |e, the p|ath name|
|000025d0| 20 69 73 20 63 6f 6e 73 | 74 72 75 63 74 65 64 20 | is cons|tructed |
|000025e0| 66 72 6f 6d 20 44 49 52 | 45 43 54 4f 52 59 20 61 |from DIR|ECTORY a|
|000025f0| 6e 64 20 74 68 65 20 62 | 75 66 66 65 72 27 73 20 |nd the b|uffer's |
|00002600| 74 72 75 65 0a 61 62 62 | 72 65 76 69 61 74 65 64 |true.abb|reviated|
|00002610| 20 66 69 6c 65 20 6e 61 | 6d 65 2c 20 77 69 74 68 | file na|me, with|
|00002620| 20 61 6c 6c 20 60 2f 27 | 20 63 68 61 72 61 63 74 | all `/'| charact|
|00002630| 65 72 73 20 69 6e 20 74 | 68 65 20 6e 61 6d 65 20 |ers in t|he name |
|00002640| 72 65 70 6c 61 63 65 64 | 20 77 69 74 68 20 60 23 |replaced| with `#|
|00002650| 27 0a 63 68 61 72 61 63 | 74 65 72 73 2c 20 61 6e |'.charac|ters, an|
|00002660| 64 20 61 70 70 65 6e 64 | 65 64 20 77 69 74 68 20 |d append|ed with |
|00002670| 60 2e 66 6c 63 27 2e 0a | 0a 49 66 20 74 68 65 20 |`.flc'..|.If the |
|00002680| 73 61 6d 65 20 66 69 6c | 65 20 68 61 73 20 64 69 |same fil|e has di|
|00002690| 66 66 65 72 65 6e 74 20 | 63 61 63 68 65 20 70 61 |fferent |cache pa|
|000026a0| 74 68 20 6e 61 6d 65 73 | 20 77 68 65 6e 20 65 64 |th names| when ed|
|000026b0| 69 74 65 64 20 6f 6e 20 | 64 69 66 66 65 72 65 6e |ited on |differen|
|000026c0| 74 0a 6d 61 63 68 69 6e | 65 73 2c 20 65 2e 67 2e |t.machin|es, e.g.|
|000026d0| 2c 20 6f 6e 20 6f 6e 65 | 20 6d 61 63 68 69 6e 65 |, on one| machine|
|000026e0| 20 74 68 65 20 63 61 63 | 68 65 20 66 69 6c 65 20 | the cac|he file |
|000026f0| 6e 61 6d 65 20 68 61 73 | 20 74 68 65 20 70 72 65 |name has| the pre|
|00002700| 66 69 78 20 60 23 68 6f | 6d 65 27 2c 0a 70 65 72 |fix `#ho|me',.per|
|00002710| 68 61 70 73 20 64 75 65 | 20 74 6f 20 61 75 74 6f |haps due| to auto|
|00002720| 6d 6f 75 6e 74 2c 20 74 | 72 79 20 70 75 74 74 69 |mount, t|ry putti|
|00002730| 6e 67 20 69 6e 20 79 6f | 75 72 20 60 7e 2f 2e 65 |ng in yo|ur `~/.e|
|00002740| 6d 61 63 73 27 20 73 6f | 6d 65 74 68 69 6e 67 20 |macs' so|mething |
|00002750| 6c 69 6b 65 3a 0a 0a 20 | 28 73 65 74 71 20 64 69 |like:.. |(setq di|
|00002760| 72 65 63 74 6f 72 79 2d | 61 62 62 72 65 76 2d 61 |rectory-|abbrev-a|
|00002770| 6c 69 73 74 20 28 63 6f | 6e 73 20 27 28 22 5e 2f |list (co|ns '("^/|
|00002780| 68 6f 6d 65 2f 22 20 2e | 20 22 2f 22 29 20 64 69 |home/" .| "/") di|
|00002790| 72 65 63 74 6f 72 79 2d | 61 62 62 72 65 76 2d 61 |rectory-|abbrev-a|
|000027a0| 6c 69 73 74 29 29 0a 0a | 45 6d 61 63 73 20 61 75 |list))..|Emacs au|
|000027b0| 74 6f 6d 61 67 69 63 61 | 6c 6c 79 20 72 65 6d 6f |tomagica|lly remo|
|000027c0| 76 65 73 20 74 68 65 20 | 63 6f 6d 6d 6f 6e 20 60 |ves the |common `|
|000027d0| 2f 74 6d 70 5f 6d 6e 74 | 27 20 61 75 74 6f 6d 6f |/tmp_mnt|' automo|
|000027e0| 75 6e 74 20 70 72 65 66 | 69 78 20 62 79 20 64 65 |unt pref|ix by de|
|000027f0| 66 61 75 6c 74 2e 0a 0a | 53 65 65 20 60 66 61 73 |fault...|See `fas|
|00002800| 74 2d 6c 6f 63 6b 2d 63 | 61 63 68 65 2d 64 69 72 |t-lock-c|ache-dir|
|00002810| 65 63 74 6f 72 79 27 2e | 1f 0a 28 64 65 66 61 6c |ectory'.|..(defal|
|00002820| 69 61 73 20 27 66 61 73 | 74 2d 6c 6f 63 6b 2d 63 |ias 'fas|t-lock-c|
|00002830| 61 63 68 65 2d 6e 61 6d | 65 20 23 5b 28 64 69 72 |ache-nam|e #[(dir|
|00002840| 65 63 74 6f 72 79 29 20 | 23 40 33 36 32 20 28 22 |ectory) |#@362 ("|
|00002850| 08 c1 98 83 5c 6e 01 30 | 5c 6e c3 50 87 c4 0d 21 |....\n.0|\n.P...!|
|00002860| 1e 06 0e 07 c8 3d 83 1a | 01 30 c9 82 1b 01 30 ca |.....=..|.0....0.|
|00002870| 1e 0b cc 1e 0d ce c4 08 | 21 21 cf d0 d1 d2 d3 0e |........|!!......|
|00002880| 0d 0e 06 5c 22 5c 22 d4 | 23 c3 51 2b 87 22 20 2e |...\"\".|#.Q+." .|
|00002890| 20 5b 64 69 72 65 63 74 | 6f 72 79 20 22 2e 22 20 | [direct|ory "." |
|000028a0| 62 75 66 66 65 72 2d 66 | 69 6c 65 2d 6e 61 6d 65 |buffer-f|ile-name|
|000028b0| 20 22 2e 66 6c 63 22 20 | 65 78 70 61 6e 64 2d 66 | ".flc" |expand-f|
|000028c0| 69 6c 65 2d 6e 61 6d 65 | 20 62 75 66 66 65 72 2d |ile-name| buffer-|
|000028d0| 66 69 6c 65 2d 74 72 75 | 65 6e 61 6d 65 20 62 75 |file-tru|ename bu|
|000028e0| 66 69 6c 65 20 73 79 73 | 74 65 6d 2d 74 79 70 65 |file sys|tem-type|
|000028f0| 20 65 6d 78 20 28 28 34 | 37 20 33 35 29 20 28 33 | emx ((4|7 35) (3|
|00002900| 35 20 33 35 20 33 35 29 | 20 28 35 38 20 35 39 29 |5 35 35)| (58 59)|
|00002910| 20 28 35 39 20 35 39 20 | 35 39 29 29 20 28 28 34 | (59 59 |59)) ((4|
|00002920| 37 20 33 35 29 20 28 33 | 35 20 33 35 20 33 35 29 |7 35) (3|5 35 35)|
|00002930| 29 20 63 68 61 72 73 2d | 61 6c 69 73 74 20 23 5b |) chars-|alist #[|
|00002940| 28 63 29 20 22 08 09 9e | 41 86 09 01 30 08 43 87 |(c) "...|A...0.C.|
|00002950| 22 20 5b 63 20 63 68 61 | 72 73 2d 61 6c 69 73 74 |" [c cha|rs-alist|
|00002960| 5d 20 32 5d 20 6d 61 70 | 63 68 61 72 73 20 66 69 |] 2] map|chars fi|
|00002970| 6c 65 2d 6e 61 6d 65 2d | 61 73 2d 64 69 72 65 63 |le-name-|as-direc|
|00002980| 74 6f 72 79 20 6d 61 70 | 63 6f 6e 63 61 74 20 63 |tory map|concat c|
|00002990| 68 61 72 2d 74 6f 2d 73 | 74 72 69 6e 67 20 61 70 |har-to-s|tring ap|
|000029a0| 70 6c 79 20 61 70 70 65 | 6e 64 20 6d 61 70 63 61 |ply appe|nd mapca|
|000029b0| 72 20 22 22 5d 29 1f 28 | 23 24 20 2e 20 31 30 33 |r ""]).(|#$ . 103|
|000029c0| 31 38 29 20 6e 69 6c 20 | 38 20 28 23 24 20 2e 20 |18) nil |8 (#$ . |
|000029d0| 39 35 32 37 29 5d 29 0a | 28 64 65 66 61 6c 69 61 |9527)]).|(defalia|
|000029e0| 73 20 27 66 61 73 74 2d | 6c 6f 63 6b 2d 73 61 76 |s 'fast-|lock-sav|
|000029f0| 65 2d 63 61 63 68 65 2d | 31 20 23 5b 28 66 69 6c |e-cache-|1 #[(fil|
|00002a00| 65 20 74 69 6d 65 73 74 | 61 6d 70 29 20 23 40 35 |e timest|amp) #@5|
|00002a10| 39 38 20 28 22 c0 c1 21 | c2 20 c3 1c 1d 1e 06 c7 |98 ("..!|. ......|
|00002a20| c8 0d 5c 22 88 c9 ca cb | 8f 88 cc 0e 06 21 88 c7 |..\"....|.....!..|
|00002a30| cd 0d 5c 66 ce 3d 83 26 | 01 30 cf 82 31 01 30 5c |..\f.=.&|.0..1.0\|
|00002a40| 66 d0 3d 83 30 01 30 d1 | 82 31 01 30 d2 23 88 5c |f.=.0.0.|.1.0.#.\|
|00002a50| 66 2b 87 22 20 2e 20 5b | 67 65 6e 65 72 61 74 65 |f+." . [|generate|
|00002a60| 2d 6e 65 77 2d 62 75 66 | 66 65 72 20 22 20 2a 66 |-new-buf|fer " *f|
|00002a70| 61 73 74 2d 6c 6f 63 6b | 2a 22 20 62 75 66 66 65 |ast-lock|*" buffe|
|00002a80| 72 2d 6e 61 6d 65 20 74 | 20 73 61 76 65 64 20 62 |r-name t| saved b|
|00002a90| 75 6e 61 6d 65 20 74 70 | 62 75 66 20 6d 65 73 73 |uname tp|buf mess|
|00002aa0| 61 67 65 20 22 53 61 76 | 69 6e 67 20 25 73 20 66 |age "Sav|ing %s f|
|00002ab0| 6f 6e 74 20 6c 6f 63 6b | 20 63 61 63 68 65 2e 2e |ont lock| cache..|
|00002ac0| 2e 22 20 6e 69 6c 20 28 | 62 79 74 65 2d 63 6f 64 |." nil (|byte-cod|
|00002ad0| 65 20 22 8a c0 c1 c2 c3 | 5c 66 44 c3 0d 44 c3 c6 |e ".....|\fD..D..|
|00002ae0| 20 44 af 05 0e 07 5c 22 | 88 0e 07 71 88 c8 65 64 | D....\"|...q..ed|
|00002af0| 0e 09 ca cb 25 88 5c 66 | 16 5c 66 0e 09 16 0d 29 |....%.\f|.\f....)|
|00002b00| ca 87 22 20 5b 70 72 69 | 6e 74 20 66 61 73 74 2d |.." [pri|nt fast-|
|00002b10| 6c 6f 63 6b 2d 63 61 63 | 68 65 2d 64 61 74 61 20 |lock-cac|he-data |
|00002b20| 32 20 71 75 6f 74 65 20 | 74 69 6d 65 73 74 61 6d |2 quote |timestam|
|00002b30| 70 20 66 6f 6e 74 2d 6c | 6f 63 6b 2d 6b 65 79 77 |p font-l|ock-keyw|
|00002b40| 6f 72 64 73 20 66 61 73 | 74 2d 6c 6f 63 6b 2d 67 |ords fas|t-lock-g|
|00002b50| 65 74 2d 66 61 63 65 2d | 70 72 6f 70 65 72 74 69 |et-face-|properti|
|00002b60| 65 73 20 74 70 62 75 66 | 20 77 72 69 74 65 2d 72 |es tpbuf| write-r|
|00002b70| 65 67 69 6f 6e 20 66 69 | 6c 65 20 6e 69 6c 20 71 |egion fi|le nil q|
|00002b80| 75 69 65 74 6c 79 20 66 | 61 73 74 2d 6c 6f 63 6b |uietly f|ast-lock|
|00002b90| 2d 63 61 63 68 65 2d 74 | 69 6d 65 73 74 61 6d 70 |-cache-t|imestamp|
|00002ba0| 20 66 61 73 74 2d 6c 6f | 63 6b 2d 63 61 63 68 65 | fast-lo|ck-cache|
|00002bb0| 2d 66 69 6c 65 6e 61 6d | 65 5d 20 37 29 20 28 28 |-filenam|e] 7) ((|
|00002bc0| 65 72 72 6f 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |error (b|yte-code|
|00002bd0| 20 22 c0 11 c0 87 22 20 | 5b 65 72 72 6f 72 20 73 | "...." |[error s|
|00002be0| 61 76 65 64 5d 20 31 29 | 29 20 28 71 75 69 74 20 |aved] 1)|) (quit |
|00002bf0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 11 c0 87 |(byte-co|de "....|
|00002c00| 22 20 5b 71 75 69 74 20 | 73 61 76 65 64 5d 20 31 |" [quit |saved] 1|
|00002c10| 29 29 29 20 6b 69 6c 6c | 2d 62 75 66 66 65 72 20 |))) kill|-buffer |
|00002c20| 22 53 61 76 69 6e 67 20 | 25 73 20 66 6f 6e 74 20 |"Saving |%s font |
|00002c30| 6c 6f 63 6b 20 63 61 63 | 68 65 2e 2e 2e 25 73 22 |lock cac|he...%s"|
|00002c40| 20 65 72 72 6f 72 20 22 | 66 61 69 6c 65 64 22 20 | error "|failed" |
|00002c50| 71 75 69 74 20 22 61 62 | 6f 72 74 65 64 22 20 22 |quit "ab|orted" "|
|00002c60| 64 6f 6e 65 22 5d 29 1f | 28 23 24 20 2e 20 31 30 |done"]).|(#$ . 10|
|00002c70| 37 37 31 29 20 6e 69 6c | 20 35 5d 29 0a 28 64 65 |771) nil| 5]).(de|
|00002c80| 66 61 6c 69 61 73 20 27 | 66 61 73 74 2d 6c 6f 63 |falias '|fast-loc|
|00002c90| 6b 2d 63 61 63 68 65 2d | 64 61 74 61 20 23 5b 28 |k-cache-|data #[(|
|00002ca0| 76 65 72 73 69 6f 6e 20 | 74 69 6d 65 73 74 61 6d |version |timestam|
|00002cb0| 70 20 6b 65 79 77 6f 72 | 64 73 20 70 72 6f 70 65 |p keywor|ds prope|
|00002cc0| 72 74 69 65 73 20 26 72 | 65 73 74 20 69 67 6e 6f |rties &r|est igno|
|00002cd0| 72 65 64 29 20 23 40 36 | 30 38 20 28 22 08 a3 3a |red) #@6|08 ("..:|
|00002ce0| 83 5c 66 01 30 08 89 41 | 40 a1 88 09 1a c3 5c 66 |.\f.0..A|@.....\f|
|00002cf0| 21 14 c3 5c 6e 21 11 29 | c5 20 c6 20 c7 1e 08 1e |!..\n!.)|. . ....|
|00002d00| 09 1e 5c 6e 0e 0b cc 55 | 83 3b 01 30 cd 20 84 3b |..\n...U|.;.0. .;|
|00002d10| 01 30 08 0e 5c 6e 9a 83 | 3b 01 30 5c 66 09 9a 84 |.0..\n..|;.0\f...|
|00002d20| 41 01 30 ce 16 08 82 69 | 01 30 cf d0 0e 09 5c 22 |A.0....i|.0....\"|
|00002d30| 88 ce d1 d2 8f 88 cf d3 | 0e 09 0e 08 d4 3d 83 5b |........|.....=.[|
|00002d40| 01 30 d5 82 67 01 30 0e | 08 d6 3d 83 66 01 30 d7 |.0..g.0.|..=.f.0.|
|00002d50| 82 67 01 30 d8 23 88 0e | 08 c7 3d 16 19 0e 08 c7 |.g.0.#..|..=.....|
|00002d60| 3d 85 77 01 30 08 89 16 | 1a 2b 87 22 20 2e 20 5b |=.w.0...|.+." . [|
|00002d70| 74 69 6d 65 73 74 61 6d | 70 20 66 6f 6e 74 2d 6c |timestam|p font-l|
|00002d80| 6f 63 6b 2d 6b 65 79 77 | 6f 72 64 73 20 63 75 72 |ock-keyw|ords cur|
|00002d90| 72 65 6e 74 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 63 |rent fon|t-lock-c|
|00002da0| 6f 6d 70 69 6c 65 2d 6b | 65 79 77 6f 72 64 73 20 |ompile-k|eywords |
|00002db0| 6b 65 79 77 6f 72 64 73 | 20 76 69 73 69 74 65 64 |keywords| visited|
|00002dc0| 2d 66 69 6c 65 2d 6d 6f | 64 74 69 6d 65 20 62 75 |-file-mo|dtime bu|
|00002dd0| 66 66 65 72 2d 6e 61 6d | 65 20 74 20 6c 6f 61 64 |ffer-nam|e t load|
|00002de0| 65 64 20 62 75 6e 61 6d | 65 20 62 75 66 2d 74 69 |ed bunam|e buf-ti|
|00002df0| 6d 65 73 74 61 6d 70 20 | 76 65 72 73 69 6f 6e 20 |mestamp |version |
|00002e00| 32 20 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |2 buffer|-modifie|
|00002e10| 64 2d 70 20 6e 69 6c 20 | 6d 65 73 73 61 67 65 20 |d-p nil |message |
|00002e20| 22 4c 6f 61 64 69 6e 67 | 20 25 73 20 66 6f 6e 74 |"Loading| %s font|
|00002e30| 20 6c 6f 63 6b 20 63 61 | 63 68 65 2e 2e 2e 22 20 | lock ca|che..." |
|00002e40| 28 66 61 73 74 2d 6c 6f | 63 6b 2d 73 65 74 2d 66 |(fast-lo|ck-set-f|
|00002e50| 61 63 65 2d 70 72 6f 70 | 65 72 74 69 65 73 20 70 |ace-prop|erties p|
|00002e60| 72 6f 70 65 72 74 69 65 | 73 29 20 28 28 65 72 72 |ropertie|s) ((err|
|00002e70| 6f 72 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |or (byte|-code ".|
|00002e80| 11 c0 87 22 20 5b 65 72 | 72 6f 72 20 6c 6f 61 64 |..." [er|ror load|
|00002e90| 65 64 5d 20 31 29 29 20 | 28 71 75 69 74 20 28 62 |ed] 1)) |(quit (b|
|00002ea0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 11 c0 87 22 20 |yte-code| "...." |
|00002eb0| 5b 71 75 69 74 20 6c 6f | 61 64 65 64 5d 20 31 29 |[quit lo|aded] 1)|
|00002ec0| 29 29 20 22 4c 6f 61 64 | 69 6e 67 20 25 73 20 66 |)) "Load|ing %s f|
|00002ed0| 6f 6e 74 20 6c 6f 63 6b | 20 63 61 63 68 65 2e 2e |ont lock| cache..|
|00002ee0| 2e 25 73 22 20 65 72 72 | 6f 72 20 22 66 61 69 6c |.%s" err|or "fail|
|00002ef0| 65 64 22 20 71 75 69 74 | 20 22 61 62 6f 72 74 65 |ed" quit| "aborte|
|00002f00| 64 22 20 22 64 6f 6e 65 | 22 20 66 6f 6e 74 2d 6c |d" "done|" font-l|
|00002f10| 6f 63 6b 2d 66 6f 6e 74 | 69 66 69 65 64 20 66 61 |ock-font|ified fa|
|00002f20| 73 74 2d 6c 6f 63 6b 2d | 63 61 63 68 65 2d 74 69 |st-lock-|cache-ti|
|00002f30| 6d 65 73 74 61 6d 70 5d | 29 1f 28 23 24 20 2e 20 |mestamp]|).(#$ . |
|00002f40| 31 31 34 38 33 29 20 6e | 69 6c 20 35 5d 29 0a 23 |11483) n|il 5]).#|
|00002f50| 40 32 38 33 20 52 65 74 | 75 72 6e 20 61 20 6c 69 |@283 Ret|urn a li|
|00002f60| 73 74 20 6f 66 20 61 6c | 6c 20 60 66 61 63 65 27 |st of al|l `face'|
|00002f70| 20 74 65 78 74 20 70 72 | 6f 70 65 72 74 69 65 73 | text pr|operties|
|00002f80| 20 69 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | in the |current |
|00002f90| 62 75 66 66 65 72 2e 0a | 45 61 63 68 20 65 6c 65 |buffer..|Each ele|
|00002fa0| 6d 65 6e 74 20 6f 66 20 | 74 68 65 20 6c 69 73 74 |ment of |the list|
|00002fb0| 20 69 73 20 6f 66 20 74 | 68 65 20 66 6f 72 6d 20 | is of t|he form |
|00002fc0| 28 56 41 4c 55 45 20 53 | 54 41 52 54 31 20 45 4e |(VALUE S|TART1 EN|
|00002fd0| 44 31 20 53 54 41 52 54 | 32 20 45 4e 44 32 20 2e |D1 START|2 END2 .|
|00002fe0| 2e 2e 29 0a 77 68 65 72 | 65 20 56 41 4c 55 45 20 |..).wher|e VALUE |
|00002ff0| 69 73 20 61 20 60 66 61 | 63 65 27 20 70 72 6f 70 |is a `fa|ce' prop|
|00003000| 65 72 74 79 20 76 61 6c | 75 65 20 61 6e 64 20 53 |erty val|ue and S|
|00003010| 54 41 52 54 78 20 61 6e | 64 20 45 4e 44 78 20 61 |TARTx an|d ENDx a|
|00003020| 72 65 20 70 6f 73 69 74 | 69 6f 6e 73 2e 0a 4f 6e |re posit|ions..On|
|00003030| 6c 79 20 74 68 6f 73 65 | 20 60 66 61 63 65 27 20 |ly those| `face' |
|00003040| 56 41 4c 55 45 73 20 69 | 6e 20 60 66 61 73 74 2d |VALUEs i|n `fast-|
|00003050| 6c 6f 63 6b 2d 73 61 76 | 65 2d 66 61 63 65 73 27 |lock-sav|e-faces'|
|00003060| 20 61 72 65 20 72 65 74 | 75 72 6e 65 64 2e 1f 0a | are ret|urned...|
|00003070| 28 64 65 66 61 6c 69 61 | 73 20 27 66 61 73 74 2d |(defalia|s 'fast-|
|00003080| 6c 6f 63 6b 2d 67 65 74 | 2d 66 61 63 65 2d 70 72 |lock-get|-face-pr|
|00003090| 6f 70 65 72 74 69 65 73 | 20 23 5b 6e 69 6c 20 23 |operties| #[nil #|
|000030a0| 40 32 34 33 20 28 22 8c | 7e 88 08 86 09 01 30 c1 |@243 (".|~.....0.|
|000030b0| 20 64 c2 89 89 89 89 1b | 1c 1d 1e 06 1e 07 1e 08 | d......|........|
|000030c0| 1e 09 0e 09 83 62 01 30 | 0e 09 40 15 0e 09 41 16 |.....b.0|..@...A.|
|000030d0| 09 c2 16 06 65 13 ca 0b | 0e 08 c5 0d 24 89 14 83 |....e...|....$...|
|000030e0| 51 01 30 cb 5c 66 0e 08 | c5 0d 24 86 45 01 30 0e |Q.0.\f..|..$.E.0.|
|000030f0| 08 13 5c 66 0b 0e 06 42 | 42 16 06 82 2d 01 30 0e |..\f...B|B...-.0.|
|00003100| 06 83 1a 01 30 0d 0e 06 | 42 0e 07 42 16 07 82 1a |....0...|B..B....|
|00003110| 01 30 0e 07 2e 08 87 22 | 20 2e 20 5b 66 61 73 74 |.0....."| . [fast|
|00003120| 2d 6c 6f 63 6b 2d 73 61 | 76 65 2d 66 61 63 65 73 |-lock-sa|ve-faces|
|00003130| 20 66 61 63 65 2d 6c 69 | 73 74 20 6e 69 6c 20 65 | face-li|st nil e|
|00003140| 6e 64 20 73 74 61 72 74 | 20 66 61 63 65 20 72 65 |nd start| face re|
|00003150| 67 69 6f 6e 73 20 70 72 | 6f 70 65 72 74 69 65 73 |gions pr|operties|
|00003160| 20 6c 69 6d 69 74 20 66 | 61 63 65 73 20 74 65 78 | limit f|aces tex|
|00003170| 74 2d 70 72 6f 70 65 72 | 74 79 2d 61 6e 79 20 74 |t-proper|ty-any t|
|00003180| 65 78 74 2d 70 72 6f 70 | 65 72 74 79 2d 6e 6f 74 |ext-prop|erty-not|
|00003190| 2d 61 6c 6c 5d 29 1f 28 | 23 24 20 2e 20 31 32 34 |-all]).(|#$ . 124|
|000031a0| 35 33 29 20 6e 69 6c 20 | 37 20 28 23 24 20 2e 20 |53) nil |7 (#$ . |
|000031b0| 31 32 31 31 37 29 5d 29 | 0a 23 40 31 39 30 20 53 |12117)])|.#@190 S|
|000031c0| 65 74 20 61 6c 6c 20 60 | 66 61 63 65 27 20 74 65 |et all `|face' te|
|000031d0| 78 74 20 70 72 6f 70 65 | 72 74 69 65 73 20 74 6f |xt prope|rties to|
|000031e0| 20 50 52 4f 50 45 52 54 | 49 45 53 20 69 6e 20 74 | PROPERT|IES in t|
|000031f0| 68 65 20 63 75 72 72 65 | 6e 74 20 62 75 66 66 65 |he curre|nt buffe|
|00003200| 72 2e 0a 41 6e 79 20 65 | 78 69 73 74 69 6e 67 20 |r..Any e|xisting |
|00003210| 60 66 61 63 65 27 20 74 | 65 78 74 20 70 72 6f 70 |`face' t|ext prop|
|00003220| 65 72 74 69 65 73 20 61 | 72 65 20 72 65 6d 6f 76 |erties a|re remov|
|00003230| 65 64 20 66 69 72 73 74 | 2e 0a 53 65 65 20 60 66 |ed first|..See `f|
|00003240| 61 73 74 2d 6c 6f 63 6b | 2d 67 65 74 2d 66 61 63 |ast-lock|-get-fac|
|00003250| 65 2d 70 72 6f 70 65 72 | 74 69 65 73 27 20 66 6f |e-proper|ties' fo|
|00003260| 72 20 74 68 65 20 66 6f | 72 6d 61 74 20 6f 66 20 |r the fo|rmat of |
|00003270| 50 52 4f 50 45 52 54 49 | 45 53 2e 1f 0a 28 64 65 |PROPERTI|ES...(de|
|00003280| 66 61 6c 69 61 73 20 27 | 66 61 73 74 2d 6c 6f 63 |falias '|fast-loc|
|00003290| 6b 2d 73 65 74 2d 66 61 | 63 65 2d 70 72 6f 70 65 |k-set-fa|ce-prope|
|000032a0| 72 74 69 65 73 20 23 5b | 28 70 72 6f 70 65 72 74 |rties #[|(propert|
|000032b0| 69 65 73 29 20 23 40 33 | 38 38 20 28 22 c0 19 c0 |ies) #@3|88 ("...|
|000032c0| 1a c3 20 1c c5 1e 06 c5 | 1e 07 c0 1e 08 c0 1e 09 |.. .....|........|
|000032d0| c0 1e 5c 6e c0 1e 0b c0 | 1e 5c 66 8c 7e 88 cd 65 |..\n....|.\f.~..e|
|000032e0| 64 5c 22 88 0e 0e 83 4f | 01 30 cf 0e 0e 40 40 44 |d\"....O|.0...@@D|
|000032f0| 11 0e 0e 40 41 12 0e 0e | 41 16 0e 5c 6e 83 24 01 |...@A...|A..\n.$.|
|00003300| 30 d0 5c 6e 40 5c 6e 41 | 40 09 23 88 5c 6e 41 41 |0.\n@\nA|@.#.\nAA|
|00003310| 89 12 82 3b 01 30 29 5c | 66 3f 85 5d 01 30 c3 20 |...;.0)\|f?.].0. |
|00003320| 85 5d 01 30 d1 c0 21 2e | 5c 6e 87 22 20 2e 20 5b |.].0..!.|\n." . [|
|00003330| 6e 69 6c 20 70 6c 69 73 | 74 20 72 65 67 69 6f 6e |nil plis|t region|
|00003340| 73 20 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |s buffer|-modifie|
|00003350| 64 2d 70 20 6d 6f 64 69 | 66 69 65 64 20 74 20 69 |d-p modi|fied t i|
|00003360| 6e 68 69 62 69 74 2d 72 | 65 61 64 2d 6f 6e 6c 79 |nhibit-r|ead-only|
|00003370| 20 62 75 66 66 65 72 2d | 75 6e 64 6f 2d 6c 69 73 | buffer-|undo-lis|
|00003380| 74 20 62 65 66 6f 72 65 | 2d 63 68 61 6e 67 65 2d |t before|-change-|
|00003390| 66 75 6e 63 74 69 6f 6e | 73 20 61 66 74 65 72 2d |function|s after-|
|000033a0| 63 68 61 6e 67 65 2d 66 | 75 6e 63 74 69 6f 6e 73 |change-f|unctions|
|000033b0| 20 64 65 61 63 74 69 76 | 61 74 65 2d 6d 61 72 6b | deactiv|ate-mark|
|000033c0| 20 62 75 66 66 65 72 2d | 66 69 6c 65 2d 6e 61 6d | buffer-|file-nam|
|000033d0| 65 20 62 75 66 66 65 72 | 2d 66 69 6c 65 2d 74 72 |e buffer|-file-tr|
|000033e0| 75 65 6e 61 6d 65 20 66 | 6f 6e 74 2d 6c 6f 63 6b |uename f|ont-lock|
|000033f0| 2d 75 6e 66 6f 6e 74 69 | 66 79 2d 72 65 67 69 6f |-unfonti|fy-regio|
|00003400| 6e 20 70 72 6f 70 65 72 | 74 69 65 73 20 66 61 63 |n proper|ties fac|
|00003410| 65 20 73 65 74 2d 74 65 | 78 74 2d 70 72 6f 70 65 |e set-te|xt-prope|
|00003420| 72 74 69 65 73 20 73 65 | 74 2d 62 75 66 66 65 72 |rties se|t-buffer|
|00003430| 2d 6d 6f 64 69 66 69 65 | 64 2d 70 5d 29 1f 28 23 |-modifie|d-p]).(#|
|00003440| 24 20 2e 20 31 32 39 38 | 37 29 20 6e 69 6c 20 35 |$ . 1298|7) nil 5|
|00003450| 20 28 23 24 20 2e 20 31 | 32 37 33 35 29 5d 29 0a | (#$ . 1|2735)]).|
|00003460| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 20 19 c2 |(byte-co|de ". ..|
|00003470| 8e c3 c4 c5 20 5c 22 2a | 83 1b 00 c6 c7 4d 88 c8 |.... \"*|.....M..|
|00003480| c9 4d 88 ca cb cc 5c 22 | 88 cd ce 21 84 36 00 cd |.M....\"|...!.6..|
|00003490| ce 21 84 2a 00 cf 16 0e | ce 0e 10 42 16 10 d1 ce |.!.*....|...B....|
|000034a0| d2 d3 23 88 d4 d5 21 84 | 41 00 d6 d5 d7 5c 22 88 |..#...!.|A....\".|
|000034b0| ca d8 d9 5c 22 88 ca da | db 5c 22 88 ca dc dd 5c |...\"...|.\"....\|
|000034c0| 22 88 d4 de 21 83 5b 00 | de df cf 5c 22 88 df 0e |"...!.[.|...\"...|
|000034d0| 20 9e 84 69 00 e1 0e 20 | e2 5c 22 16 20 e3 e4 21 | ..i... |.\". ..!|
|000034e0| 87 22 20 5b 6d 61 74 63 | 68 2d 64 61 74 61 20 6d |." [matc|h-data m|
|000034f0| 61 74 63 68 2d 64 61 74 | 61 20 28 28 73 74 6f 72 |atch-dat|a ((stor|
|00003500| 65 2d 6d 61 74 63 68 2d | 64 61 74 61 20 6d 61 74 |e-match-|data mat|
|00003510| 63 68 2d 64 61 74 61 29 | 29 20 73 74 72 69 6e 67 |ch-data)|) string|
|00003520| 2d 6d 61 74 63 68 20 22 | 58 45 6d 61 63 73 22 20 |-match "|XEmacs" |
|00003530| 65 6d 61 63 73 2d 76 65 | 72 73 69 6f 6e 20 66 61 |emacs-ve|rsion fa|
|00003540| 73 74 2d 6c 6f 63 6b 2d | 67 65 74 2d 66 61 63 65 |st-lock-|get-face|
|00003550| 2d 70 72 6f 70 65 72 74 | 69 65 73 20 23 5b 6e 69 |-propert|ies #[ni|
|00003560| 6c 20 22 8c 7e 88 c0 89 | 19 1a c3 c4 21 88 5c 6e |l ".~...|....!.\n|
|00003570| 2b 87 22 20 5b 6e 69 6c | 20 63 65 6c 6c 20 70 72 |+." [nil| cell pr|
|00003580| 6f 70 65 72 74 69 65 73 | 20 6d 61 70 2d 65 78 74 |operties| map-ext|
|00003590| 65 6e 74 73 20 23 5b 28 | 65 78 74 65 6e 74 20 69 |ents #[(|extent i|
|000035a0| 67 6e 6f 72 65 29 20 22 | c0 09 21 89 1a 83 42 00 |gnore) "|..!...B.|
|000035b0| 0b 83 12 00 5c 6e 0b 3e | 83 42 00 c4 09 21 c5 09 |....\n.>|.B...!..|
|000035c0| 21 1e 06 1e 07 5c 6e 0e | 08 9e 89 16 09 83 36 00 |!....\n.|......6.|
|000035d0| 0e 09 0e 07 0e 06 0e 09 | 41 42 42 a1 88 82 41 00 |........|ABB...A.|
|000035e0| 5c 6e 0e 07 0e 06 45 0e | 08 42 16 08 2a 29 ca 87 |\n....E.|.B..*)..|
|000035f0| 22 20 5b 65 78 74 65 6e | 74 2d 66 61 63 65 20 65 |" [exten|t-face e|
|00003600| 78 74 65 6e 74 20 76 61 | 6c 75 65 20 66 61 73 74 |xtent va|lue fast|
|00003610| 2d 6c 6f 63 6b 2d 73 61 | 76 65 2d 66 61 63 65 73 |-lock-sa|ve-faces|
|00003620| 20 65 78 74 65 6e 74 2d | 73 74 61 72 74 2d 70 6f | extent-|start-po|
|00003630| 73 69 74 69 6f 6e 20 65 | 78 74 65 6e 74 2d 65 6e |sition e|xtent-en|
|00003640| 64 2d 70 6f 73 69 74 69 | 6f 6e 20 65 6e 64 20 73 |d-positi|on end s|
|00003650| 74 61 72 74 20 70 72 6f | 70 65 72 74 69 65 73 20 |tart pro|perties |
|00003660| 63 65 6c 6c 20 6e 69 6c | 5d 20 35 5d 5d 20 32 20 |cell nil|] 5]] 2 |
|00003670| 22 52 65 74 75 72 6e 20 | 61 20 6c 69 73 74 20 6f |"Return |a list o|
|00003680| 66 20 61 6c 6c 20 60 66 | 61 63 65 27 20 74 65 78 |f all `f|ace' tex|
|00003690| 74 20 70 72 6f 70 65 72 | 74 69 65 73 20 69 6e 20 |t proper|ties in |
|000036a0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|000036b0| 65 72 2e 5c 6e 45 61 63 | 68 20 65 6c 65 6d 65 6e |er.\nEac|h elemen|
|000036c0| 74 20 6f 66 20 74 68 65 | 20 6c 69 73 74 20 69 73 |t of the| list is|
|000036d0| 20 6f 66 20 74 68 65 20 | 66 6f 72 6d 20 28 56 41 | of the |form (VA|
|000036e0| 4c 55 45 20 53 54 41 52 | 54 31 20 45 4e 44 31 20 |LUE STAR|T1 END1 |
|000036f0| 53 54 41 52 54 32 20 45 | 4e 44 32 20 2e 2e 2e 29 |START2 E|ND2 ...)|
|00003700| 5c 6e 77 68 65 72 65 20 | 56 41 4c 55 45 20 69 73 |\nwhere |VALUE is|
|00003710| 20 61 20 60 66 61 63 65 | 27 20 70 72 6f 70 65 72 | a `face|' proper|
|00003720| 74 79 20 76 61 6c 75 65 | 20 61 6e 64 20 53 54 41 |ty value| and STA|
|00003730| 52 54 78 20 61 6e 64 20 | 45 4e 44 78 20 61 72 65 |RTx and |ENDx are|
|00003740| 20 70 6f 73 69 74 69 6f | 6e 73 2e 5c 6e 4f 6e 6c | positio|ns.\nOnl|
|00003750| 79 20 74 68 6f 73 65 20 | 60 66 61 63 65 27 20 56 |y those |`face' V|
|00003760| 41 4c 55 45 73 20 69 6e | 20 60 66 61 73 74 2d 6c |ALUEs in| `fast-l|
|00003770| 6f 63 6b 2d 73 61 76 65 | 2d 66 61 63 65 73 27 20 |ock-save|-faces' |
|00003780| 61 72 65 20 72 65 74 75 | 72 6e 65 64 2e 22 5d 20 |are retu|rned."] |
|00003790| 66 61 73 74 2d 6c 6f 63 | 6b 2d 73 65 74 2d 66 61 |fast-loc|k-set-fa|
|000037a0| 63 65 2d 70 72 6f 70 65 | 72 74 69 65 73 20 23 5b |ce-prope|rties #[|
|000037b0| 28 70 72 6f 70 65 72 74 | 69 65 73 29 20 22 8c 7e |(propert|ies) ".~|
|000037c0| 88 c0 65 64 5c 22 88 09 | 85 30 00 09 40 40 09 40 |..ed\"..|.0..@@.@|
|000037d0| 41 1a 1b 5c 6e 83 29 00 | c4 5c 6e 40 5c 6e 41 40 |A..\n.).|.\n@\nA@|
|000037e0| 0b 23 88 5c 6e 41 41 89 | 12 84 18 00 09 41 11 2a |.#.\nAA.|.....A.*|
|000037f0| 82 08 00 29 87 22 20 5b | 66 6f 6e 74 2d 6c 6f 63 |...)." [|font-loc|
|00003800| 6b 2d 75 6e 66 6f 6e 74 | 69 66 79 2d 72 65 67 69 |k-unfont|ify-regi|
|00003810| 6f 6e 20 70 72 6f 70 65 | 72 74 69 65 73 20 72 65 |on prope|rties re|
|00003820| 67 69 6f 6e 73 20 66 61 | 63 65 20 66 6f 6e 74 2d |gions fa|ce font-|
|00003830| 6c 6f 63 6b 2d 73 65 74 | 2d 66 61 63 65 5d 20 35 |lock-set|-face] 5|
|00003840| 20 22 53 65 74 20 61 6c | 6c 20 60 66 61 63 65 27 | "Set al|l `face'|
|00003850| 20 74 65 78 74 20 70 72 | 6f 70 65 72 74 69 65 73 | text pr|operties|
|00003860| 20 74 6f 20 50 52 4f 50 | 45 52 54 49 45 53 20 69 | to PROP|ERTIES i|
|00003870| 6e 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 62 75 |n the cu|rrent bu|
|00003880| 66 66 65 72 2e 5c 6e 41 | 6e 79 20 65 78 69 73 74 |ffer.\nA|ny exist|
|00003890| 69 6e 67 20 60 66 61 63 | 65 27 20 74 65 78 74 20 |ing `fac|e' text |
|000038a0| 70 72 6f 70 65 72 74 69 | 65 73 20 61 72 65 20 72 |properti|es are r|
|000038b0| 65 6d 6f 76 65 64 20 66 | 69 72 73 74 2e 5c 6e 53 |emoved f|irst.\nS|
|000038c0| 65 65 20 60 66 61 73 74 | 2d 6c 6f 63 6b 2d 67 65 |ee `fast|-lock-ge|
|000038d0| 74 2d 66 61 63 65 2d 70 | 72 6f 70 65 72 74 69 65 |t-face-p|ropertie|
|000038e0| 73 27 20 66 6f 72 20 74 | 68 65 20 66 6f 72 6d 61 |s' for t|he forma|
|000038f0| 74 20 6f 66 20 50 52 4f | 50 45 52 54 49 45 53 2e |t of PRO|PERTIES.|
|00003900| 22 5d 20 61 64 64 2d 68 | 6f 6f 6b 20 66 6f 6e 74 |"] add-h|ook font|
|00003910| 2d 6c 6f 63 6b 2d 61 66 | 74 65 72 2d 66 6f 6e 74 |-lock-af|ter-font|
|00003920| 69 66 79 2d 62 75 66 66 | 65 72 2d 68 6f 6f 6b 20 |ify-buff|er-hook |
|00003930| 66 61 73 74 2d 6c 6f 63 | 6b 2d 61 66 74 65 72 2d |fast-loc|k-after-|
|00003940| 66 6f 6e 74 69 66 79 2d | 62 75 66 66 65 72 20 62 |fontify-|buffer b|
|00003950| 6f 75 6e 64 70 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d |oundp fo|nt-lock-|
|00003960| 69 6e 68 69 62 69 74 2d | 74 68 69 6e 67 2d 6c 6f |inhibit-|thing-lo|
|00003970| 63 6b 20 6e 69 6c 20 63 | 75 72 72 65 6e 74 2d 6c |ck nil c|urrent-l|
|00003980| 6f 61 64 2d 6c 69 73 74 | 20 70 75 74 20 76 61 72 |oad-list| put var|
|00003990| 69 61 62 6c 65 2d 64 6f | 63 75 6d 65 6e 74 61 74 |iable-do|cumentat|
|000039a0| 69 6f 6e 20 22 4c 69 73 | 74 20 6f 66 20 46 6f 6e |ion "Lis|t of Fon|
|000039b0| 74 20 4c 6f 63 6b 20 6d | 6f 64 65 20 72 65 6c 61 |t Lock m|ode rela|
|000039c0| 74 65 64 20 6d 6f 64 65 | 73 20 74 68 61 74 20 73 |ted mode|s that s|
|000039d0| 68 6f 75 6c 64 20 6e 6f | 74 20 62 65 20 74 75 72 |hould no|t be tur|
|000039e0| 6e 65 64 20 6f 6e 2e 22 | 20 66 62 6f 75 6e 64 70 |ned on."| fboundp|
|000039f0| 20 66 6f 6e 74 2d 6c 6f | 63 6b 2d 63 6f 6d 70 69 | font-lo|ck-compi|
|00003a00| 6c 65 2d 6b 65 79 77 6f | 72 64 73 20 64 65 66 61 |le-keywo|rds defa|
|00003a10| 6c 69 61 73 20 69 64 65 | 6e 74 69 74 79 20 61 66 |lias ide|ntity af|
|00003a20| 74 65 72 2d 73 61 76 65 | 2d 68 6f 6f 6b 20 66 61 |ter-save|-hook fa|
|00003a30| 73 74 2d 6c 6f 63 6b 2d | 73 61 76 65 2d 63 61 63 |st-lock-|save-cac|
|00003a40| 68 65 2d 61 66 74 65 72 | 2d 73 61 76 65 2d 66 69 |he-after|-save-fi|
|00003a50| 6c 65 20 6b 69 6c 6c 2d | 62 75 66 66 65 72 2d 68 |le kill-|buffer-h|
|00003a60| 6f 6f 6b 20 66 61 73 74 | 2d 6c 6f 63 6b 2d 73 61 |ook fast|-lock-sa|
|00003a70| 76 65 2d 63 61 63 68 65 | 2d 62 65 66 6f 72 65 2d |ve-cache|-before-|
|00003a80| 6b 69 6c 6c 2d 62 75 66 | 66 65 72 20 6b 69 6c 6c |kill-buf|fer kill|
|00003a90| 2d 65 6d 61 63 73 2d 68 | 6f 6f 6b 20 66 61 73 74 |-emacs-h|ook fast|
|00003aa0| 2d 6c 6f 63 6b 2d 73 61 | 76 65 2d 63 61 63 68 65 |-lock-sa|ve-cache|
|00003ab0| 73 2d 62 65 66 6f 72 65 | 2d 6b 69 6c 6c 2d 65 6d |s-before|-kill-em|
|00003ac0| 61 63 73 20 61 64 64 2d | 6d 69 6e 6f 72 2d 6d 6f |acs add-|minor-mo|
|00003ad0| 64 65 20 66 61 73 74 2d | 6c 6f 63 6b 2d 6d 6f 64 |de fast-|lock-mod|
|00003ae0| 65 20 6d 69 6e 6f 72 2d | 6d 6f 64 65 2d 61 6c 69 |e minor-|mode-ali|
|00003af0| 73 74 20 61 70 70 65 6e | 64 20 28 28 66 61 73 74 |st appen|d ((fast|
|00003b00| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 20 6e 69 6c 29 29 |-lock-mo|de nil))|
|00003b10| 20 70 72 6f 76 69 64 65 | 20 66 61 73 74 2d 6c 6f | provide| fast-lo|
|00003b20| 63 6b 5d 20 34 29 0a    |                         |ck] 4). |        |
+--------+-------------------------+-------------------------+--------+--------+